Email with VB

[Luthv]

Why not try vbsendmail.dll, it's been around for a while now, with full source code, only need winsock.
You can find it in this link
http://www.freevbcode.com/ShowCode.Asp?ID=109

[erickwidya]

thanks Luthv and Zeb..
it just coincedent or vbsendmail that u and Zeb talking are the same?

well..i guess i'm gonna give it a try...
thanks again

[Zeb]

no coincidence - it's a pretty commonly used dll cause it is so much better than MAPI

[babtbaby]

Hi all,

I seem to have problems tackling the security issues of the Microsoft Outlook as the window on
"A program is trying to automatically send emails on your behalf.
Do you allow this?

If this is unexpected, it may be a virus and you should choose "No"."

I have searched through msdn pages, and found this url.
http://msdn.microsoft.com/library/de...mmatically.asp

However, the security features on my Microsoft Outlook is disabled. So how is it possible to still get this message? what else can I do?

Thanx. Need the help i could get!

[Vag]

I'm afraid you can't do anything.
Older versions of Outlook didn't have that feature but Microsoft added it for extra security.
I strongly recommend that you use vbSendMail.dll (see posts above).

[WizBang]

This may help you out. It only uses winsock:
http://www.codeguru.com/forum/showth...562#post685872

[babtbaby]

Well i realised i cant get past the outlook thingy. So the best way is probably to use SMTP which i did.

Dim iMsg As New CDO.Message
Dim iConf As New CDO.Configuration
Dim Flds

Set Flds = iConf.Fields

With Flds
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = SMTPServer
'Use SSL to connect to the SMTP server:
.Item(cdoSMTPServerPort) = SMTPPort
.Item(cdoSMTPConnectionTimeout) = 10
.Update

End With

With iMsg
Set .Configuration = iConf
.To = ReceiveBY
.From = SendBY
.Subject = strSubj
.HTMLBody = strBody
End With

And it works fine and save me all the trouble of finding ways to bypass the outlook security. But anyway thanx guys for the help.

[NatThoelecke]

Well i realised i cant get past the outlook thingy.

Actually, you can bypass the Outlook warning messages. ContextMagic has written a freeware program called ClickYes that essentially suppresses the Outlook warnings. The following link allows you to download the program and offers instructions on how to implement its use in various programming languages. http://www.contextmagic.com/express-clickyes/
Naturally, due to inherent risks from viruses I'd recommend using this program only when absolutely necessary (i.e. if Outlook is your only option for sending email), otherwise keep it turned off.

[acf01]

Here is that tricky code that will allow you to get past the Outlook security box when auto-sending emails thru a program. It puts an Icon on the task tray that you can set the activation on. It is called ClickYesSetup. I didn't attach it because it is an executable and we all are wary of those.
But, you can google it and it will come up. This will save a tone of time when your program has to send out more than just a few emails

Al

[mohsinzahoor]

when I use this code to send mail,my McFee displayes the "Protocol Error" message.
I am using this code.

Private Sub Command1_Click()
MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.Compose
MAPIMessages1.RecipAddress = "[email protected]"
MAPIMessages1.ResolveName
MAPIMessages1.MsgSubject = "Message Subject"
MAPIMessages1.MsgNoteText = "Hello World"
MAPIMessages1.Send False
MAPISession1.SignOff
End Sub

plz tel me the solution quicky.

[mohsinzahoor]

I have run the following code a number of times,the code runs correctly, no error msg.but after some time my McFee display that a mail to specified person with subject is beaing sent,but with a protocol msg,So, I Uninstall the McFe. sut still I am unable to sent mail.I have run code from "Bnoyzy"but still.....
I am getting no msg ,but unable to send mail.
plz tell me the sol.