61
Administration & Userprobleme / Antw:Notes Hilfe
« Letzter Beitrag von jBubbleBoy am 20.09.24 - 12:48:00 »OK, nach "doc.zip" muss man suchen, um alle internen Hilfen zu finden, das hilft erstmal weiter.
Danke
Danke
With LN_Document
.Form = "Memo"
.sendTo = sMailTo
.copyTo = sCopyTo
.Subject = sSubject
.body = sBody
.SaveMessageOnSend = True
.PostedDate = Now()
Call .Save(True, True)
End With
'Jetzt Notes es los ...!
'Set LN_Workspace = CreateObject("Notes.NotesUILN_Workspace")
'Call LN_Workspace.EDITDOCUMENT(True, LN_Document).GOTOFIELD("Body")
With LN_Document
.Form = "Memo"
.sendTo = sMailTo
.copyTo = sCopyTo
.Subject = sSubject
.body = sBody
.SaveMessageOnSend = True
.PostedDate = Now()
Call .Send(False)
End With
'Jetzt Notes es los ...!
'Set LN_Workspace = CreateObject("Notes.NotesUILN_Workspace")
'Call LN_Workspace.EDITDOCUMENT(True, LN_Document).GOTOFIELD("Body")
Call LN_Workspace.EDITDOCUMENT(True, LN_Document).GOTOFIELD("Body")
' Speicher leeren
Set LN_EmbedObject = Nothing
Set LN_attachement = Nothing
Set LN_Document = Nothing
Set LN_Database = Nothing
Set LN_Session = Nothing
'Speicher für aktuelle Mail leeren
Set LN_Document = Nothing
Set LN_attachement = Nothing
''>>>>> XL-relevant: <<<<<
'Filter-Ende
End If
'Schleifen-Return
Next
Application.ScreenUpdating = True
'Speicher für LN leeren
Set LN_EmbedObject = Nothing
Set LN_Database = Nothing
Set LN_Session = Nothing