sgundrum
asked on
Creating an email message using VB6
I want to create a button to open a new email message with the subject and email address filled in. Can any one help me please?
What are you using to send email ? MAPI ? CDONTS ? Other Services ? Give information.
ASKER
this will be for people using internet mail, outlook express and outlook under 95/98 and possible NT
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
If you have a webserver installed then you can adopt to this code.
dim objMail as Object' I am using late bound since i don't know if i can create CDONTS with New Keword
Set objMail = CreateObject("CDONTS.NewMa il")
objMail.From "yourcompanyname@cp.com"
objMail.TO text1.text ' send mail to
objMail.Subject text2.text 'subj message
objMail.Body Text3.text 'body message
objMail.Send 'Method to send Mail.
Set objMail = nothing 'Kill Reference.
dim objMail as Object' I am using late bound since i don't know if i can create CDONTS with New Keword
Set objMail = CreateObject("CDONTS.NewMa
objMail.From "yourcompanyname@cp.com"
objMail.TO text1.text ' send mail to
objMail.Subject text2.text 'subj message
objMail.Body Text3.text 'body message
objMail.Send 'Method to send Mail.
Set objMail = nothing 'Kill Reference.