Sending email via VB6 - basic.visual

Jacques St-Pierre wrote:
> Hello,
>
> I need a simple way to send very simple email via a VB6 code. Anyone know
> how to do that? Any code avaliable? Without using Outlook if possible, I
> only have Outlook Express avaliable.

You'll want to look into VB6's "Microsoft MAPI Controls 6.0" and the
"Simple MAPI" version of the Windows Mail API (MAPI), which is what
Outlook Express provides you. In my experience sending mail through
MAPI isn't simple, but it'll work with OE.

This link has some good introductory information:
http://www.com.it-berater.org/COM/mapi/mapi.htm

Here is a solution for you:

http://www.freevbcode.com/ShowCode.Asp?ID=109

I really like this. It uses the WinSock control, rather than CDO/MAPI which
requires Outlook.

Jay Taplin

Take a look at CDOSYS.

Mike.

"Jacques St-Pierre" <multelec@globetrotter.net> wrote in message
news:akzxf.78644$OU5.70730@clgrps13...
>
> Hello,
>
> I need a simple way to send very simple email via a VB6 code. Anyone know
> how to do that? Any code avaliable? Without using Outlook if possible, I
> only have Outlook Express avaliable.
>
> Bye
> Jacques
>
>
>
>

CDOSYS doesn't require MAPI, which it sounds like you wish to avoid. It's
also on every Windows 2000 and later system, both server and workstation.

Mike.

"Michael D. Ober" <obermd.@.alum.mit.edu.nospam> wrote in message
news:nUkyf.2842$ee6.491@newsread3.news.pas.earthlink.net...
>
>
> Take a look at CDOSYS.
>
> Mike.
>
> "Jacques St-Pierre" <multelec@globetrotter.net> wrote in message
> news:akzxf.78644$OU5.70730@clgrps13...
> >
> > Hello,
> >
> > I need a simple way to send very simple email via a VB6 code. Anyone
know
> > how to do that? Any code avaliable? Without using Outlook if possible, I
> > only have Outlook Express avaliable.
> >
> > Bye
> > Jacques
> >
> >
> >
> >
>
>
>
>

Try this:

MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
'Compose new message
MAPIMessages1.Compose
'Address message
MAPIMessages1.RecipDisplayName = "George Bush"
MAPIMessages1.RecipAddress = george@whitehouse.gov
' Resolve recipient name
MAPIMessages1.AddressResolveUI = True
MAPIMessages1.ResolveName
'Create the message
MAPIMessages1.MsgSubject = "I Love ya"
MAPIMessages1.MsgNoteText = "Hey Bubba"
'Add attachment
MAPIMessages1.AttachmentPathName = "c:\zxcvzxcv.zip"
'Send the message
MAPIMessages1.Send False
MAPISession1.SignOff

"Jacques St-Pierre" <multelec@globetrotter.net> wrote in message
news:akzxf.78644$OU5.70730@clgrps13...
> Hello,
>
> I need a simple way to send very simple email via a VB6 code. Anyone know
> how to do that? Any code avaliable? Without using Outlook if possible, I
> only have Outlook Express avaliable.
>
> Bye
> Jacques
>
>
>