Lotus Notes and OLE
From: Peter Häusler <luciver_at_teleweb.at>
Date: Mon, 24 Jun 2002 19:03:42 +0200
Message-ID: <XiIR8.61$Qf3.3860_at_nreader1.kpnqwest.net>
Date: Mon, 24 Jun 2002 19:03:42 +0200
Message-ID: <XiIR8.61$Qf3.3860_at_nreader1.kpnqwest.net>
Hi!
I have found the example on the metalink to send a
Mail over Lotus Notes, and it works find.
Now my Problem is to open the Memo Screen so the
user can edit the Mail bevor send..
Does anybody know how i can reach this
??
To send directly i use ...
ole2.Add_Arg(v_param,0);
ole2.Invoke(v_doc, 'Send', v_param);
ole2.Invoke(v_doc, 'Send', v_param);
and i think to open the memo screen it must be
something like this ....
v_doc := ole2.Invoke_Obj(v_db,
'CreateDocument');
v_param := ole2.Create_Arglist;
ole2.Add_Arg(v_param,True);
v_doc_1 := ole2.Invoke_Obj(v_doc, 'EditDocument', v_param);
ole2.Destroy_Arglist(v_param);
ole2.Add_Arg(v_param,True);
v_doc_1 := ole2.Invoke_Obj(v_doc, 'EditDocument', v_param);
ole2.Destroy_Arglist(v_param);
Does anybody know what i am doing wrong
???
Peter
Häusler
Received on Mon Jun 24 2002 - 19:03:42 CEST