Das Notes Forum
HCL Notes / Domino / Diverses => Entwicklung => Thema gestartet von: ralph71 am 27.06.23 - 16:04:10
-
Hallo zusammen,
mittels LS möchte ich eine Mail nach einer bestimmten Zeichenfolge durchsuchen
Mein (gekürzter) Code:
Dim body As NotesRichTextItem
Dim doc As NotesDocument
Dim Mailtext As String
Dim Dateiname As String
Set body = doc.GetFirstItem("Body")
...
Mailtext = body.Text
If Instr("unverändert", Mailtext) > 0 Then
Dateiname = "unverändert"
End If
...
Wenn ich Mailtext zur Kontrolle direkt schreiben lasse, dann steht da im String unter anderem auch "unverändert". Dh es wird aus dem Body in Mailtext ausgelesen, aber das Instr findet den gesuchten String nicht.
Selbst eine erneute Konvertierung über Mailtext2 = CStr(Mailtext) ist ohne Erfolg.
Was mache ich falsch?
Edit: der Agent läuft zeitgesteuert am Server.
Vielen Dank!
-
Die Elemente sind vertauscht
Instr(Mailtext,"unverändert")
-
Ein Wahnsinn. Meine Güte.
FUNKTIONIERT!
DANKE!