Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Sending E-mail
- Thread starter dcarbone
- Start date
ChainsawJoe
Programmer
*ping*
merry xmas.
--------------------------------------------------
- better than toast.
Penguins - better than --------------------------------------------------
merry xmas.
--------------------------------------------------
- better than toast.
Penguins - better than --------------------------------------------------
Code:
' Send email
Set objMail = Server.CreateObject("CDONTS.NewMail")
with objMail
.From = "me@mydomain.com"
.To = "you@yourdomain.org"
.Subject = "An email!"
'create html email
note = "You've just received an email from me."
HTML = HTML & "<HTML>"
HTML = HTML & "<HEAD>"
HTML = HTML & "<TITLE>A little something</TITLE>"
HTML = HTML & "</HEAD>"
HTML = HTML & "<BODY bgcolor=""#FEECCB"">"
HTML = HTML & "<CENTER>" & note
HTML = HTML & "<BR><BR>"
HTML = HTML & "</BODY>"
HTML = HTML & "</HTML>"
'you need TO add these lines FOR the mail
'to be sent in HTML format
.BodyFormat = 0
.MailFormat = 0
'Response.Write note 'test to see if the id worked
.Body = HTML
.importance = 0
.Send
end with
Set objMail = nothingBastien
Any one have a techie job in Toronto, I need to work...being laid off sucks!
ChainsawJoe
Programmer
try;
.From = "Kendel<kendel@yahoo.com>"
--------------------------------------------------
- better than toast.
Penguins - better than --------------------------------------------------
.From = "Kendel<kendel@yahoo.com>"
--------------------------------------------------
- better than toast.
Penguins - better than --------------------------------------------------
I tried to use CDONTS on my ASP page, and I get the following error message:
Server object error 'ASP 0177 : 800401f3'
Server.CreateObject Failed
/AddUser.asp, line 104
Invalid class string
I asked my IT people and they said well,
"All ASP support CDONTS and our web server supports ASP."
If it does support it, then why can't I use it??
Is there a way around this??
Thank you for your help.
Server object error 'ASP 0177 : 800401f3'
Server.CreateObject Failed
/AddUser.asp, line 104
Invalid class string
I asked my IT people and they said well,
"All ASP support CDONTS and our web server supports ASP."
If it does support it, then why can't I use it??
Is there a way around this??
Thank you for your help.
I tried to use ASPMail and SMTPsvg.Mailer
For example:
Set Mailer = Server.CreateObject("SMTPsvg.Mailer"
Mailer.FromName = "Webmaster"
Mailer.FromAddress = "me@yahoo.com"
Mailer.RemoteHost = "199.000.000.000"
Mailer.AddRecipient "Me", "me@yahoo.com"
Mailer.Subject = "Testing"
Mailer.BodyText = "Testing mail"
If Mailer.SendMail then
Response.Write "Mail Sent.."
Else
Response.Write "Mail send failure" & Mailer.Response
End If
Didn't work,
What can I do to get mail component to work???
Thanks again.
For example:
Set Mailer = Server.CreateObject("SMTPsvg.Mailer"
Mailer.FromName = "Webmaster"
Mailer.FromAddress = "me@yahoo.com"
Mailer.RemoteHost = "199.000.000.000"
Mailer.AddRecipient "Me", "me@yahoo.com"
Mailer.Subject = "Testing"
Mailer.BodyText = "Testing mail"
If Mailer.SendMail then
Response.Write "Mail Sent.."
Else
Response.Write "Mail send failure" & Mailer.Response
End If
Didn't work,
What can I do to get mail component to work???
Thanks again.
You might want to try CDONTS
Set objCDOMail = CreateObject("CDONTS.NewMail"
objCDOMail.BodyFormat = 0
objCDOMail.MailFormat = 0
objCDOMail.Importance = 2
objCDOMail.From = "me@yahoo.com"
objCDOMail.To = "someone@yahoo.com"
objCDOMail.CC = "CC here"
objCDOMail.BCC = "BCC here"
objCDOMail.Subject = "Testing...."
objCDOMail.Body = "Email body"
objCDOMail.Send
Set objCDOMail = CreateObject("CDONTS.NewMail"
objCDOMail.BodyFormat = 0
objCDOMail.MailFormat = 0
objCDOMail.Importance = 2
objCDOMail.From = "me@yahoo.com"
objCDOMail.To = "someone@yahoo.com"
objCDOMail.CC = "CC here"
objCDOMail.BCC = "BCC here"
objCDOMail.Subject = "Testing...."
objCDOMail.Body = "Email body"
objCDOMail.Send
- Status
Similar threads
- Locked
- Question
- Locked
- Question