hallo
Ich habe ein RTF-Feld in ein Text-Feld umgestellt. Wenn ich die Maske öffne dann speicher und schließe ist das Feld umgestellt.
Da ich aber viele Dokumente habe möchte ich diese per Agent umstellen
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument()
While Not(doc Is Nothing)
Set item = doc.replaceitemvalue("FELD",FELD)
item.isnames = True
Call doc.save(True,True)
Set doc = collection.GetNextDocument(doc)
Wend
End Sub
Das Feld ist aber dann leer
Was mach ich falsch?
Gruß Rainer