über vb script Notes Mail generieren

[meo]

folgendes Problem :

ich würde gern über ein vb-Script Notes aufrufen und ein Mail erzeugen,
hierbei übergebe ich durch das vb-script ein Subject und ein Body Text.

Grund: Leider kann Notes keine "mailto:" mit Parameter verarbeiten:

mailto:?subject=Konjunkturkurve_Bitte_checken&body=http://nt00/frueprod_start.html?45
Der Wert 45 wird leider abgeschnitten, in Outlook funktioniert es einwandfrei

[Performance]

ist das ok ?

http://www.atnotes.de/index.php?board=7;action=display;threadid=4266;start=0

ich habe leider mein vb deinstalliert ... kann nicht auf die schnelle was erstellen


cu

[meo]

Ihr seit ja schneller als die Polizei erlaubt !!!  

Danke -
das sieht so gut aus, das der User garnicht mehr merkt wie das Mail erzeugt wird !!

Leider bin ich nicht der beste vbscript kenner.
Wie kann ich es erreichen, das man das memo sieht,
damit der User den Empfänger des Mails auswählen kann ?
gibt es hierzu einen Schalter ??

Mein bisheriges Script:

   Set session = CreateObject("Notes.NotesSession")
   mailserver = session.GetEnvironmentString("MailServer", True)
   mailfile = session.GetEnvironmentString("MailFile", True)
   
   Set db = session.GetDatabase(mailserver, mailfile)
   Set memo = db.CreateDocument
   
   memo.Subject = "System bitte checken!"
   Set body = memo.CreateRichTextItem("Body")

   Call body.AppendText("http://system?45")
   Call body.AddNewLine(2)
   
   'hier muss ich leider den Empfänger des Mails eintragen
   
   Call memo.Send(False, "admin@firma.de")

[meo]

jetzt habe ich's:

Set session = CreateObject("Notes.NotesSession")
set ws = CreateObject("Notes.NotesUIWorkspace")
mailserver = session.GetEnvironmentString("MailServer", True)
mailfile = session.GetEnvironmentString("MailFile", True)
   
Set db = session.GetDatabase(mailserver, mailfile)
   
Set memo = db.CreateDocument
   
memo.Subject = "cgate - "

set uidoc = ws.EditDocument(true,memo)
text = uidoc.FieldGetText("Body")
call uidoc.FieldSetText("Body","http://cgate?45" + chr(10) + chr(10) + text)

funktioniert bestens
der User muss nur noch den Adressat auswählen und versenden.