Hi zusammen,
bei einem Kunden verschicken wir Support-Mails nach extern direkt über die Mail.box, um den namen des Absenders zu verstecken.
Das funktioniert leider seit Domino 10 nicht mehr richtig - so werden z.B. Tabellen als Striche dargestellt
|------------------------------------+------------------------------------|
|111 |222 |
|------------------------------------+------------------------------------|
|aaa |bbb |
|------------------------------------+------------------------------------|
Den alten Trick mit session.ConvertMime = false hab ich schon ausprobiert, leider ohne Erfolg.
Hat da jmd einen Tip für mich, was ich noch probieren könnte? Oder liegt das an einer (neuen) Server-Einstellung seit 10?
Beim Versenden kommt folgendes Script zum Einsatz
Sub Click(Source As Button)
On Error Goto exception
Dim s As New notessession
s.ConvertMime = False
Dim ws As New notesuiworkspace
Dim uidoc As NotesUIDocument
Set uidoc = ws.CurrentDocument
Dim doc As NotesDocument
Set doc = uidoc.Document
Call doc.Save(False, False)
Dim mailBox As NotesDatabase
Set mailBox = New NotesDatabase("myserver", "mail2.box")
Dim memo As notesdocument
Set memo = New NotesDocument(mailBox)
Call doc.CopyAllItems(memo, True)
memo.Form = "Memo"
memo.From = "Testgruppe@myserver.de"
memo.SMTPOriginator = "Testgruppe@myserver.de"
memo.Sender = "Testgruppe@myserver.de"
memo.INetFrom = "Testgruppe@myserver.de"
memo.Principal = "Testgruppe@myserver.de"
memo.SendTo = "xxx@web.de"
memo.Recipients = "xxx@web.de"
Call memo.Save(True, False)
Call doc.PutInFolder("(Sent)")
Call uidoc.Close()
leave:
s.ConvertMime = True
Exit Sub
exception:
Msgbox Cstr(Error) + " / " + Cstr(Erl)
Goto leave
End Sub
Danke & Gruß,
Buzzy