OBJET MAPI AIDE SVP

Question

g trouver ce code sur le forum mai il ne marche pa:
MAPISession1.SignOn
With MAPIMessages1
.MsgIndex = -1
.RecipDisplayName = "Nom de la personne"
.RecipAddress = "adresse"
.MsgSubject = "test" ' ici le sujet du mail
.MsgNoteText = "hello" ' ici le message du mail
.AttachmentPathName = "truc"
.SessionID = MAPISession1.SessionID
.Send
End With
MAPISession1.SignOff
il me dit que MAPISession1 ne'st pas declarer et je ne conais pas les objets MAPI quelqun  peu til mexpliquer merci d'avance

msohet · Answer

vérifies si tes objets MAPISession sont correctement déclarés, vérifies égalament les références de ton projet.

SOHET Morgan

C.N.P.O. - Le Belloy

KOMZY · Answer

javai oublier mai maintenan il me variable with ou bloc with non declarer pkoi

msohet · Answer

ca veut dire qu'il ne reconnais pas un identifiant d'objet (un nom de variable en gros),

faut pt ton code je te le debuggerai (enfin j'essaierai)

SOHET Morgan

C.N.P.O. - Le Belloy

KOMZY · Answer

voila le code ke g mi ds mon bouton envoyer:
Dim MAPISession1 As mapisession
Dim MAPIMessages1 As MAPIMessages'qry "select E-mail from societe where nomste '" & cmbste.Text & "'"
'Set rec = dbnpai.OpenRecordset(qry, dbOpenSnapshot)
'If MAPISession1.NewSession = True Then
'  MAPISession1.SignOff
'End If

MAPISession1.SignOn
MsgBox MAPISession1.SessionID
With MAPIMessages1
.MsgIndex = -1
.RecipDisplayName = "Nom de la personne"
.RecipAddress = "xxxx@club-internet.fr"
.MsgSubject = "Statistiques NPAI" ' ici le sujet du mail
.MsgNoteText = "hello" ' ici le message du mail
.AttachmentPathName = "C:\Documents and Settings\guillaume\Mes documents\Projet NPAI	est.xls"
.SessionID = MAPISession1.SessionID
.Send
End With
MAPISession1.SignOff
Jte remerci davance,si tu trouve pourrai tu mexpli cmt ta fai

OBJET MAPI AIDE SVP

4 réponses

Discussions similaires