Domino 9 und frühere Versionen > ND7: Entwicklung

Wundersame Vermehrung von Anführungszeichen?!?

<< < (3/3)

ata:
... versuchs mal damit:


--- Code: ---' # ...
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Dim sFormula As String
Dim sSuchstring As String
' # ...

sSuchstring = "Der Suchbegriff"
sFormula =  {SELECT Form = "DeinMaskenName" & @Contains(@Text( Body ) ; "} & sSuchstring & {")}
Set dc = db.Search( sFormula , Nothing , 0 )

If dc.Count > 0 Then
   ' # Treffer
   Set doc = dc.GetFirstDocument
   While not doc Is Nothing
      ' # ...
      Set doc = dc.getNextDocument( doc )
   Wend
End If

--- Ende Code ---

... so aus dem Bauch heraus sollte das tun - habs jetzt nicht gestestet...

Toni

Navigation

[0] Themen-Index

[*] Vorherige Sete