hi,
i have some problems, when i send mail using this code.
----------- code----------------------------------
Dim app As Application = New Application
Dim oMail As MailItem
Dim mapi As MAPI.Session = New MAPI.SessionClass
Dim mess As MAPI.Message
Dim strEntry As String
oMail = app.CreateItem(OlItemType.olMailItem)
oMail.To = "shabbir@comsdev.com.pk"
oMail.Body = "Hi a test Message"
oMail.BodyFormat = OlBodyFormat.olFormatHTML
oMail.Close(OlInspectorClose.olSave)
strEntry = oMail.EntryID
oMail = Nothing
mapi.Logon()
Dim msg As MAPI.Messages = mapi.Outbox.Messages()
Dim ms As MAPI.Message
msg.Delete()
mess = mapi.GetMessage(strEntry)
mess.Send()
mapi.Logoff()
mapi = Nothing
app = Nothing
---------end code---------------------
when i try to send mail then this popup display.....
" A PROGRAMM IS TRYING TO SEND
AUTOMETICALLY E-MAIL ON YOUR
BEHALF DO YOU WANT TO ALLOW
THIS. "
my question:
have any way to hide this popup. i want this message should not display
regards
i have some problems, when i send mail using this code.
----------- code----------------------------------
Dim app As Application = New Application
Dim oMail As MailItem
Dim mapi As MAPI.Session = New MAPI.SessionClass
Dim mess As MAPI.Message
Dim strEntry As String
oMail = app.CreateItem(OlItemType.olMailItem)
oMail.To = "shabbir@comsdev.com.pk"
oMail.Body = "Hi a test Message"
oMail.BodyFormat = OlBodyFormat.olFormatHTML
oMail.Close(OlInspectorClose.olSave)
strEntry = oMail.EntryID
oMail = Nothing
mapi.Logon()
Dim msg As MAPI.Messages = mapi.Outbox.Messages()
Dim ms As MAPI.Message
msg.Delete()
mess = mapi.GetMessage(strEntry)
mess.Send()
mapi.Logoff()
mapi = Nothing
app = Nothing
---------end code---------------------
when i try to send mail then this popup display.....
" A PROGRAMM IS TRYING TO SEND
AUTOMETICALLY E-MAIL ON YOUR
BEHALF DO YOU WANT TO ALLOW
THIS. "
my question:
have any way to hide this popup. i want this message should not display
regards