title image


Smiley Re: Autorenfeld
das from-feld kannst du nur ändern, wenn du die mail direkt in der mail.box erzeugst; z.b.



'Create a new document in the severs mail box



Dim ses As New NotesSession

Dim mailbox As New NotesDatabase("","")

Dim maildoc As NotesDocument

Dim rtitem As NotesRichTextItem

dim ...



Set mailbox = ses.getDatabase(dein_server,"mail.box",False)



Set maildoc = mailbox.CreateDocument

maildoc.Form = "Memo"

maildoc.From = sendas

maildoc.SendFrom = sendas

maildoc.SendTo = sendto

maildoc.Recipients = sendto

maildoc.Subject = subject

Set rtitem = maildoc.CreateRichTextItem( "Body" )

Call rtitem.AppendText( message )

maildoc.PostedDate = Now()

maildoc.ComposedDate = Now()

maildoc.DeliveredDate = Now()

maildoc.Principal = sendas

maildoc.EncryptOnSend = False



Call maildoc.Save( True, False )



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: