?
Solved

Feedback form error Server object error 'ASP 0177 : 800401f3'

Posted on 2006-05-22
7
Medium Priority
?
379 Views
Last Modified: 2011-10-03
I’m trying to use a simple feedback form. When I click submit with my test data it returns this error.

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/chefdaveorgdev/contact.asp, line 89

800401f3

below is my sample code

'receive the form values
Dim sName, sEmail, sFeedback
sName=Request.Form("txtName")
sAddress=Request.Form("textAddress")
sEmail=Request.Form("txtEmail")
sFeedback=Request.Form("txtFeedback")

'create the mail object
Set NewMailObj=Server.CreateObject("CDONTS.NewMail") <---------------line 89
NewMailObj.From=sEmail
NewMailObj.To = "erictrogdon@gmail.com" '
NewMailObj.Subject = "Feedback"
NewMailObj.Body = sEmailText
NewMailObj.BodyFormat = 0
NewMailObj.MailFormat = 0
NewMailObj.Send
Set NewMailObj=Nothing

Response.write "<div align='center'>Thank you for sending your feedback.<br>"
Response.write "We will get back to you if necessary.</div>"
End If
%>






0
Comment
Question by:Eric_Trogdon
  • 3
  • 3
7 Comments
 
LVL 12

Expert Comment

by:_Maddog_
ID: 16735137
Hi Eric_Trogdon,

CDONTS has been deprecated on Win XP/2003 servers.
Use CDOSYS instead, some info here: http://www.hosting.fast-trak.net/tutorials/cdosys_asp_tutorial.htm

- Maddog
0
 

Author Comment

by:Eric_Trogdon
ID: 16735289
that go me past that error but now I get this error



Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'NewMailObj.Body'

/chefdaveorgdev/contact.asp, line 93


I'm using a variable to return the values of the data entered into the text boxes to produce an html email to the reciever. Does using this method support what I'm trying to do?

here is my variable

' create the HTML formatted email text
Dim sEmailText
sEmailText = sEmailText & "<html>"
sEmailText = sEmailText & "<head>"
sEmailText = sEmailText & "<title>HTML Email</title>"
sEmailText = sEmailText & "</head>"
sEmailText = sEmailText & "<body>"
sEmailText = sEmailText & "Feedback message from: " & sName & "<br>"
sEmailText = sEmailText & "Address:" & sAddress & "<br>"
sEmailText = sEmailText & "Message:" & sFeedback & "<br>"
sEmailText = sEmailText & "Date & Time:" & Now() & "<br>"
sEmailText = sEmailText & "IP :" & Request.ServerVariables("REMOTE_ADDR")
sEmailText = sEmailText & "</body>"
sEmailText = sEmailText & "</html>"

'create the mail object
Set NewMailObj=Server.CreateObject("CDO.Message")
NewMailObj.From=sEmail
NewMailObj.To = "etrogdon@gmail.com"
NewMailObj.Subject = "Feedback"
NewMailObj.Body = sEmailText <-------Line 93
NewMailObj.BodyFormat = 0
NewMailObj.MailFormat = 0
NewMailObj.Send
Set NewMailObj=Nothing

Response.write "<div align='center'>Thank you for sending your feedback.<br>"
Response.write "We will get back to you if necessary.</div>"
End If
%>





0
 
LVL 25

Expert Comment

by:kevp75
ID: 16735290
it has, but you can still use it.  You would need to find the DLL file to downoad it, then register it using regsvr32
0
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 
LVL 12

Expert Comment

by:_Maddog_
ID: 16735313
Eric_Trogdon,
> Object doesn't support this property or method: 'NewMailObj.Body'

The URL I gave has some useful examples on using CDOSYS.
It's a bit different, but similarly simple.

- Maddog
0
 

Author Comment

by:Eric_Trogdon
ID: 16735431
thanks maddog. I'm serching the link currently any other links that would help?
0
 
LVL 12

Accepted Solution

by:
_Maddog_ earned 2000 total points
ID: 16735478
0
 

Author Comment

by:Eric_Trogdon
ID: 16735613
Thanks maddog works perferct. Been a long time since I've done any coding. Having to learn all over again.
0

Featured Post

Prep for the ITIL® Foundation Certification Exam

December’s Course of the Month is now available! Enroll to learn ITIL® Foundation best practices for delivering IT services effectively and efficiently.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:   The Exchange of informatio…
This demonstration started out as a follow up to some recently posted questions on the subject of logging in: http://www.experts-exchange.com/Programming/Languages/Scripting/JavaScript/Q_28634665.html and http://www.experts-exchange.com/Programming/…
Integration Management Part 2
Are you ready to place your question in front of subject-matter experts for more timely responses? With the release of Priority Question, Premium Members, Team Accounts and Qualified Experts can now identify the emergent level of their issue, signal…
Suggested Courses
Course of the Month16 days, 15 hours left to enroll

862 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question