Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
BUG in VFP8SP1?
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01012851
Message ID:
01012917
Views:
25
Instead of using the Notes object try the Domino object. Replace this line
loNotes     = CREATEOBJECT("Notes.NotesSession" )
with this line:
loNotes     = CREATEOBJECT("Lotus.NotesSession" )
You will need to get the user logged in and you will not need to worry about if Notes is open. To log the default user in on the machine simply call the Initialize() method and supply the password. If you're using version 6.5 or higher, you can change the user as well.

Also in the alines() line: you may try this for a more precise translation to an array:
alines(acEmpfaenger, "ctestjs@Test.de;datenaustausch@Test.de", .T., ";")
HTH
Richard


>Hi Folks!
>
>This Code (to send an eMail via LotusNotes) works fine with VFP7.0.
>
>* Array der Empfänger erstellen
>alines(acEmpfaenger, chrtran("testjs@Test.de;datenaustausch@Test.de", ";", chr(13)) )
>loNotes     = CREATEOBJECT("Notes.NotesSession" )
>loDatenbank = loNotes.GetDatabase( '', '' )
>loDatenbank.OpenMail()
>loDatensatz = loDatenbank.CreateDocument("NotesDocument", "New", loDatenbank)
>loDatensatz.ReplaceItemValue("Form", "Memo" )
>loDatensatz.ReplaceItemValue("Subject", "Test5  mit CC")
>loDatensatz.SaveMessageOnSend = .t.
>loDatensatz.ReplaceItemValue("SendTo", @acEmpfaenger)
>loDatensatz.Send(.t.)
>
>
>Bud in VFP8 SP1 I get an Error in Line
>
>loDatensatz.ReplaceItemValue("SendTo", @acEmpfaenger)
>
>The class file (loDatensatz) associated with this field cannot be found - class association cleard.
>
>Whats this?
>I tested in VFP9 and it works without an Problem bud I have to do it with VFP8!
>Any help wanted!
>
>Greetings from Germany
State of Florida, DCF
Previous
Reply
Map
View

Click here to load this message in the networking platform