Outlook Problem

[Bob]

I have been using "mapi" to send mail from my vb applications for
some time. I am now working in vb.net. The problem I am having now is
that I need the "from" address to be different than the default one
for the user.

I could not find a way to change the "from" address when sending a
mail. Another way that would work would be to change to a different
email account or change the default account to something different. I
could find a way to do that either.

I finally solve it by setting by a second profile and logging on as the
alternate profile. This solution turned out to be unacceptable to the
user. For one thing she had to be completely log out of her normal
profile or it would work. Below is the code I use so you can see what
I'm doing.

Dim mobjOutlook As New Outlook.Application

Dim moItems As Outlook.Items

Dim moCt As Outlook.ContactItem
' Dim oCt As Outlook.DistListItem

Dim mobjmail As Outlook.MailItem
Dim mMyAttachments As Object

Dim oNS As Outlook.NameSpace = mobjOutlook.GetNamespace("mapi")
oNS.Logon(mProfilename, "", False, True) '
mobjmail = mobjOutlook.CreateItem(0)
' Send the mail
With mobjmail
.Subject = pSubject
.Body = pBody
.To = pTo
.CC = pcc
.BCC = pBcc
.Send()

End With