Das Notes Forum
Lotus Notes / Domino Sonstiges => Tipps und Tricks => Thema gestartet von: eknori am 10.04.02 - 15:42:24
-
geht so .. :o
Function DBColumn(strClass As String, strNoCache As String, strServer As String, strDatabase As String, strView As String, numCol As Integer) As Variant
quotes = Chr(34)
strFormula = "@Left(@Trim( @DbColumn(" & quotes & strClass & quotes & ":" & quotes & strNoCache & quotes & ";" & quotes & strServer & quotes & ":" & quotes & strDatabase & quotes & ";" & quotes & strView & quotes & ";" & numCol & "));1)"
DbColumn = Evaluate( strFormula )
End Function
;D ;D ;D 8)