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

Server Object Errors

Status
Not open for further replies.

harbor75

IS-IT--Management
Dec 26, 2004
2
US
I am not a developer but a network technician. We host a website for a travel agency. An online form request for information (.ASP page) submits a request with to an email address. The following error is returned when that is submitted: Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/Destinations/Info.asp, line 847

800401f3

After a server crash the following did not work:
Dim oMailMessage

' Instantiate a NewMail object
Set oMailMessage = Server.CreateObject("CDONTS.NewMail")

' Send an email to to@somewhere.com from from@somewhere.com
oMailMessage.from = "info@bestcruises.com"
oMailMessage.to = "leads@bestcruises.com"
oMailMessage.subject = "Online Information Request"
oMailMessage.body = body
oMailMessage.Send()

The developer was told to change it to this:
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.From = "info@bestcruises.com"
objCDO.To = "leads@bestcruises.com"
objCDO.Subject = "Online Information Request"
objCDO.Body = body
objCDO.Send()
Set objCDO = Nothing




'Dim oMailMessage

' Instantiate a NewMail object
'Set oMailMessage = Server.CreateObject("CDONTS.NewMail")

' Send an email to to@somewhere.com from from@somewhere.com
'oMailMessage.from = "info@bestcruises.com"
'oMailMessage.to = "leads@bestcruises.com"
'oMailMessage.subject = "Online Information Request"
'oMailMessage.body = body
'oMailMessage.Send()

It still does not work. Same error message.
 
there is no functional difference between the two scripts.

i would make sure the CDONTS.NewMail component is registered properly and that smtp is running.

check out the asp forum333 too


-jeff
try { succeed(); } catch(E) { tryAgain(); } finally { rtfm(); }
i like your sleeves...they're real big
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top