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 TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Wierd error with CDONTS script, not sending to hotmail!

Status
Not open for further replies.

F430

Programmer
Dec 6, 2005
8
GB
Hello,

Below i have made a CDONTS email script which sends perfectly to Googlemail, BUT ,my hotmail address does not recieve anything, not even the email!

Do you know what it could be?


<%
If Request.Form("submit")= "send" then
toname = Request.Form("toname")
toemail = Request.Form("toemail")
message = Request.Form("message")
fromname = Request.Form("fromname")
fromemail = Request.Form("fromemail")

Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")

HTML = HTML & "<HTML>"
HTML = HTML & "<HEAD>"
HTML = HTML & "<TITLE>Greeting Card from someone</TITLE>"
HTML = HTML & "</HEAD>"
HTML = HTML & "<BODY bgcolor=""White"">"
HTML = HTML & "Hello " & toname & "<p>"
HTML = HTML & fromname & " has sent you a get well card!<p>"
HTML = HTML & "<IMG SRC=""URL/ecard01_large.jpg""></A><BR><BR>"
HTML = HTML & message & " - Message from " & fromname
HTML = HTML & "<BR><BR>"
HTML = HTML & "</BODY>"
HTML = HTML & "</HTML>"

objCDO.To = toemail
objCDO.Cc = ""
objCDO.Bcc = ""
objCDO.From = fromemail
objCDO.Subject = fromname & " has sent you a get well card!"




objCDO.BodyFormat = 0
objCDO.MailFormat = 0
objCDO.Body = HTML

objCDO.Send
Set objCDO = Nothing

End If
%>
 
check your trash folder in hotmail - is it appearing there?


Tony
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top