Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
BUG in VFP8SP1?
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Titre:
Versions des environnements
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Divers
Thread ID:
01012851
Message ID:
01012917
Vues:
28
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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform