Solved

easy question

Posted on 2001-07-24
12
224 Views
Last Modified: 2012-05-04

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/jai/addmember.asp, line 93

Invalid class string

Line 93 is:
SET myMail = Server.CreateObject("CDONTS.Newmail")







My code is:

<%

Response.Cookies("JAI").Expires = "Jan 1, 2005"
Response.Buffer = True%>

<html><title>iBuddyList.com - Member Sign-Up</title></head><body>

<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" bordercolordark="#4B6194" cellspacing="1">
  <tr>
    <td width="100%" bordercolor="#336699" bgcolor="#336699">
      <p align="center"><b><font face="Verdana" size="1" color="#FFFFFF">Sign up
      Now!&nbsp; | 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&nbsp; <b>Time:</b> 9:41pm&nbsp; <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>
    <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.com
      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">&nbsp;<p align="center">&nbsp;</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")("MemberName") =  sUserFull
Response.Cookies("JAI")("MemberCompany") = sUserName
Response.Cookies("JAI")("MemberEmail") = sEmail
Response.Cookies("JAI")("MemberPhone") = sPassword
Response.Cookies("JAI")("MemberAddress") = sAddress
Response.Cookies("JAI")("MemberCity") = sCity
Response.Cookies("JAI")("MemberState") = sState
Response.Cookies("JAI")("MemberZip") = sZip
Response.Cookies("JAI")("MemberFax") = sFax

Response.Write "Thanks for registering"


      '################MAIL THE PERSON!!!!!!!!!!!
        DIM myMail
      Dim mBody
      SET myMail = Server.CreateObject("CDONTS.Newmail")
      myMail.From = "kevin@johnsonadvertising.com"
      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.com if you have any questions." & vbCrLf & vbCrLf
      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
%>
0
Comment
Question by:TRD_Supra
  • 4
  • 3
  • 2
  • +3
12 Comments
 
LVL 7

Expert Comment

by:John844
ID: 6313816
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.
0
 
LVL 8

Expert Comment

by:drittich
ID: 6313820
That means CDONTS was not installed when IIS was installed on the server.  
0
 
LVL 18

Accepted Solution

by:
mgfranz earned 25 total points
ID: 6313860
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
0
 

Author Comment

by:TRD_Supra
ID: 6313866
its uploaded to my domain and its doing it..
0
 

Author Comment

by:TRD_Supra
ID: 6313870
it wasnt working in pws either...
0
 
LVL 18

Expert Comment

by:mgfranz
ID: 6313872
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 18

Expert Comment

by:mgfranz
ID: 6313887
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.
0
 

Author Comment

by:TRD_Supra
ID: 6313916
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
0
 
LVL 18

Expert Comment

by:mgfranz
ID: 6314123
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.
0
 
LVL 7

Expert Comment

by:cstsang
ID: 6315921
are u started the smtp service in control-> service?
Or
have u install the SMTP service on your server?
0
 

Expert Comment

by:RedCCameleon
ID: 6343735
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
0
 
LVL 7

Expert Comment

by:John844
ID: 6385885
still no comment...
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
C# page opens in new window 3 55
C# Passing long parameter from one form to another 4 79
EOF BOF error classic asp 8 43
API not working 33 57
Hello, all! I just recently started using Microsoft's IIS 7.5 within Windows 7, as I just downloaded and installed the 90 day trial of Windows 7. (Got to love Microsoft for allowing 90 days) The main reason for downloading and testing Windows 7 is t…
I would like to start this tip/trick by saying Thank You, to all who said that this could not be done, as it forced me to make sure that it could be accomplished. :) To start, I want to make sure everyone understands the importance of utilizing p…
This Micro Tutorial hows how you can integrate  Mac OSX to a Windows Active Directory Domain. Apple has made it easy to allow users to bind their macs to a windows domain with relative ease. The following video show how to bind OSX Mavericks to …
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…

863 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

Need Help in Real-Time?

Connect with top rated Experts

26 Experts available now in Live!

Get 1:1 Help Now