We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Course Of The Month
Become a Premium Member and unlock a new, free course in leading technologies each month.
Solved
easy question
Posted on 2001-07-24
Server object error 'ASP 0177 : 800401f3'
Server.CreateObject Failed
/jai/addmember.asp, line 93
Invalid class string
Line 93 is:
SET myMail = Server.CreateObject("CDONT
My code is:
<%
Response.Cookies("JAI").Ex
Response.Buffer = True%>
<html><title>iBuddyList.co
<table border="0" width="100%">
<tr>
<td width="100%"><img border="0" src="defaul1.gif"></td>
</tr>
</table>
<table border="0" width="100%" bgcolor="#FFFFFF" bordercolorlight="#FFFFFF"
<tr>
<td width="100%" bordercolor="#336699" bgcolor="#336699">
<p align="center"><b><font face="Verdana" size="1" color="#FFFFFF">Sign up
Now! | Members Login | Services | Help</font></b></td>
</tr>
</table>
<table border="0" width="100%" height="1" cellspacing="1" cellpadding="0">
<tr>
<td width="100%" height="1" bgcolor="#FFFFFF" valign="baseline" colspan="2">
<p align="center"><font face="Tahoma" size="1"><b>Welcome</b> to
iBuddyList.com <b>Time:</b> 9:41pm <b>Date:</b> 9/16/00</font></td>
</tr>
<tr>
<td width="25%" height="1" bgcolor="#15266C" valign="baseline">
<p align="center"><b><font face="Verdana" color="#FFFFFF" size="1">What is
iBuddyList.com?</font></b>
<td width="75%" height="1" valign="top"></td>
</tr>
<tr>
<td width="25%" bgcolor="#336699" height="1">
<p align="center"><font size="1" color="#FFFFFF" face="Tahoma">iBuddyList.c
is a great place to monitor your buddies online status without downloading
any software. See if your buddy is online and instant message them, and
best of all, its free!</font><p align="center"> <p align="center"> </td>
<td width="75%" height="1" bgcolor="#FFFFFF" valign="top">
<%AddMember%>
</tr>
</table>
</body>
</html>
<!-- #INCLUDE FILE="adovbs.inc" -->
<% Sub AddMember()
Dim sUserName, sPassWord, sSecondPass, RS
Dim I ' Standard looping var
sEmail = Request.Form ("txtemail")
sUserFull = Request.Form ("txtfull")
sUserName = Request.form("txtcompany")
sPassWord = Request.Form("txtphone")
sFax = Request.form("txtfax")
sAddress = Request.form("txtaddr1") & vbCrLF & Request.form("txtAddr2")
sCity = Request.form("txtcity")
sState = Request.form("txtState")
sZip = Request.form("txtZip")
If instr(1,sEmail,"@",1) = 0 then
response.write "<font face =tahoma size=1>Invalid Email Address.</font><br>"
sEmail = ""
end if
If len(sEmail) > 4 then
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Cookies("JAI")("M
Response.Write "Thanks for registering"
'################MAIL THE PERSON!!!!!!!!!!!
DIM myMail
Dim mBody
SET myMail = Server.CreateObject("CDONT
myMail.From = "kevin@johnsonadvertising.
myMail.To = sEmail
myMail.Subject = "Thank You for subscribing to Johnson Advertising's Mailing List."
mBody = mBody & "<font face=verdana size=1><b>www.johnsonadvertising.com - Member List ;)</b>" & vbCrLf & vbCrLf & vbCrLf
mBody = mBody & "Dear " & sUserFull & ":" & vbCrLf & vbCrLf
mBody = mBody & " Click <a href = http://www.johnsonadvertising.com/subscribe.asp> Here</a> to varify your subscription to Johnson Advertising. "
mBody = mBody & "Upon varifying a free mug will be mailed to you!" & vbcrlf & vbcrlf
mBody = mBody & vbCrLf & "Contact us at info@johnsonadvertising.co
mBody = mBody & "Sincerly,"
mBody = mBody & vbCrLf & vbCrLf
mBody = mBody & "Kevin Johnson" & vbcrlf
mBody = mBody & "www.johnsonadvertising.com.com </font>"
myMail.Body = mBody
myMail.Send
SET myMail = Nothing
Elseo
response.write "<font face=verdana size=1>Please go back and fill out all the information correctly. Thank you :-]"
end if
End SUb
%>
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
4-
3
-
2
- +3
12 Comments
if you are trying to run this on PWS then it would be because cdonts is not supportes on PWS. If it is happening on IIS then make sure that SMTP services are installed properly. You can take a quick look in c:/winnt/system32 for cdonts.dll. if it is not there then reinstall SMTP services.
If you are not tryinng to run CDONTS on a PWS machine, and you installed the SMTP service, you will either need to re-install the SMTP service, or try to register the .dll
Basic explaination; http://support.microsoft.com/support/kb/articles/Q249/2/90.ASP
SMTP will not work in PWS. Period.
If it runs from the domain then SMTP is properly configured on the domain server but not your dev server.
If it runs from the domain then SMTP is properly configured on the domain server but not your dev server.
OK, i didnt expect it to work in PWS, but I did expect it to work on the domain. (burlee is the host) i figured they have the smtp service)...
but its not working on the domain
but its not working on the domain
Is burlee set-up for SMTP on your domain? If you are not using an IIS hosting plan then your script won't work. I suggest you call their support line.
are u started the smtp service in control-> service?
Or
have u install the SMTP service on your server?
Or
have u install the SMTP service on your server?
TRD_Supra,
if your question has been resolved, please accept any of the above comments as the answer. If you think this question has not been answered (yet), then please elaborate together with the experts on how to solve your problem, or make you understand why there is no solution.
I will check this question again in a few days, if no comment has been added, I will split the points between mgfranz and John844.
RedCCameleon,
COmmunity Support Moderator @ Experts Exchange
if your question has been resolved, please accept any of the above comments as the answer. If you think this question has not been answered (yet), then please elaborate together with the experts on how to solve your problem, or make you understand why there is no solution.
I will check this question again in a few days, if no comment has been added, I will split the points between mgfranz and John844.
RedCCameleon,
COmmunity Support Moderator @ Experts Exchange
Featured Post
![[Webinar] Learn How Hackers Steal Your Credentials](https://filedb.experts-exchange.com/files/public/2017/5/21/e0b7778f-e79e-4b5d-9ec6-5496e40be42e.png)
Do You Know How Hackers Steal Your Credentials? Join us and Skyport Systems to learn how hackers steal your credentials and why Active Directory must be secure to stop them. Thursday, July 13, 2017 10:00 A.M. PDT
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
I recently decide that I needed a way to make my pages scream on the net. While searching around how I can accomplish this I stumbled across a great article that stated "minimize the server requests."
I got to thinking, hey, I use more than one…
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…
In this video we outline the Physical Segments view of NetCrunch network monitor. By following this brief how-to video, you will be able to learn how NetCrunch visualizes your network, how granular is the information collected, as well as where to f…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…
Suggested Courses
Earn Certification
HTML5 Specialist - Certification
Free withPremium
Course of the Month4 days, 1 hour left to enroll
630 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.