Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Maildb.OPENMAIL

jhofman

XLDnaute Occasionnel
bonsoir

J'utilise le code suivant pour envoyer un mail depuis excel via LOTUS
Cela marche très sauf sur mon pc /ou avec mon compte lotus....

je ne sais pas ... mais ce que j'ai remarqué c'est que le ligne
Code:
Maildb.OPENMAIL

ne fait pas que Maildb.IsOpen est à True !!

Merci de votre aide

Code:
UserName = Session.UserName
MailDbName = Left$(UserName, 1) & Right$(UserName, (Len(UserName) - InStr(1, UserName, " "))) & ".nsf"
Set Maildb = Session.GETDATABASE("", MailDbName)
If Maildb.IsOpen = True Then
                    'Already open for mail
Else
                 Maildb.OPENMAIL
End If
Set MailDoc = Maildb.CreateDocument
 

Discussions similaires

Réponses
14
Affichages
742
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…