
MAPI works but not CDONTS?
I am testing two different ways to send email in VB. The one using
MAPI works fine although it asks for the profile name. The one using
CDONTS did not give me any error message, but the recipient never got
the email. We are using an Exchange server and I have Outlook running
on my machine. Is there some thing on my machine to be set up for
CDNOTS? HOw can I check if my SMTP client is set up properly?
Thanks.
Kan
Private Sub Command1_Click()
Dim b As New CDONTS.NewMail
CDONTS" & Now, "test"
End Sub
Private Sub Command2_Click()
MAPISession.DownLoadMail = False
MAPISession.LogonUI = True
MAPISession.SignOn
MAPIMsg.SessionID = MAPISession.SessionID
MAPIMsg.Compose
MAPIMsg.AddressLabel = "xxx Address Label"
MAPIMsg.AddressCaption = "xxx Address Label"
MAPIMsg.MsgSubject = "test using mapi"
MAPIMsg.MsgNoteText = "test text" & Now
MAPIMsg.ResolveName
MAPIMsg.Send
MAPISession.SignOff
End Sub
Sent via Deja.com http://www.*-*-*.com/
Before you buy.