A
Andy Levy
Hi,
I am using the ACG Pdf and Mail Class library, and trying to invoke the
LogOnProfile method. However, mail is always being sent out on the default
account (ie account1)
How can i get it to send using account2. Thanks for your help.
Andy
Here is my code :
Public Function tred()
Dim objMail As New MailClass
Dim Success As Long
With objMail
.LogOnProfile = "account2"
.RecipientAdd "name", "(e-mail address removed)", , , False
.MsgSubjectText = "Recent sales results"
.MsgBodyText = "Here's the report and distribution list you wanted."
.MsgSaveCopy = True
.SendMail
Success = .Result
Debug.Print Success
'Some code : Copyright © 1997-2003 ATTAC Consulting Group
End With
Set objMail = Nothing
End Function
I am using the ACG Pdf and Mail Class library, and trying to invoke the
LogOnProfile method. However, mail is always being sent out on the default
account (ie account1)
How can i get it to send using account2. Thanks for your help.
Andy
Here is my code :
Public Function tred()
Dim objMail As New MailClass
Dim Success As Long
With objMail
.LogOnProfile = "account2"
.RecipientAdd "name", "(e-mail address removed)", , , False
.MsgSubjectText = "Recent sales results"
.MsgBodyText = "Here's the report and distribution list you wanted."
.MsgSaveCopy = True
.SendMail
Success = .Result
Debug.Print Success
'Some code : Copyright © 1997-2003 ATTAC Consulting Group
End With
Set objMail = Nothing
End Function