[violet]

Hi everyone~ , i'm new to ASP language, so now i had face some problem in my ASP code for sending email. Here is my code as below :-

<%
Dim MailObj
Set MailObj = Server.CreateObject ("CDONTS.NewMail")
MailObj.From = "serder@carstd.com"
MailObj.To = "receiver@yahoo.com"
MailObj.Subject = "Thanks for Registering with Carstudio!"
MailObj.Body = "You have Registered for CarStudio.com"

MailObj.BodyFormat = 1
MailObj.MailFormat = 0
MailObj.Send set MailObj = Nothing

Response.Write ( " Dealer Sucessfully Registered. Kindly wait for our notification email to approve your dealership.")
%>

when i try to sign up as a new dealer, after i click 'Register Me' button , it display the error message as below:-

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/DealerRegister.asp, line 306
'Set MailObj = Server.CreateObject("CDONTS.NewMail") ->for line 306

800401f3

eventhough it display the error message but the data still store in my database file.
anyone can tell me what wrong in my code? thanks a lot.

[chirag]

Hi,

try using following code this is you code only i have not made any changes just re-formatted.....which you can notice...
your original code was not working...
but its working fine....now
have a try...

<%
Dim MailObj
Set MailObj = Server.CreateObject ("CDONTS.NewMail")
MailObj.From = "serder@carstd.com"
MailObj.To = "receiver@yahoo.com"
MailObj.Subject = "Thanks for Registering with Carstudio!"
MailObj.Body = "You have Registered for CarStudio.com"

MailObj.BodyFormat = 1
MailObj.MailFormat = 0
MailObj.Send
set MailObj = Nothing

Response.Write ( " Dealer Sucessfully Registered. Kindly wait for our notification email to approve your dealership.")
%>

[ggill]

You need to register CDONTS.dll
check this link
http://crt.doce.lsu.edu/CRT-HTML-Class/Lesson29a.html

[Mikeirv]

Most likely your server is the latest Windows Server and does not use CDONTS. Try the folowing

<%
set MailObj = Server.CreateObject("CDO.Message")
MailObj.From = "serder@carstd.com"
MailObj.To = "receiver@yahoo.com"
MailObj.Subject = "Thanks for Registering with Carstudio!"
''// For text email use
MailObj.TextBody = "You have Registered for CarStudio.com"
''// For HTML email use
MailObj.HTMLBody = "You have Registered for CarStudio.com"
MailObj.Send
set MailObj = Nothing

Response.Write ( " Dealer Sucessfully Registered. Kindly wait for our notification email to approve your dealership.")
%>

As you can see it is very close, but leave it to MicroStiff to change it just enough to cause errors.