1. Advertising
    y u no do it?

    Advertising (learn more)

    Advertise virtually anything here, with CPM banner ads, CPM email ads and CPC contextual links. You can target relevant areas of the site and show ads based on geographical location of the user if you wish.

    Starts at just $1 per CPM or $0.10 per CPC.

Server object error 'ASP 0177 : 800401f3'

Discussion in 'C#' started by kleenideas, Oct 16, 2008.

0
  1. #1
    HI,

    I get this error when I fill the form on my website which is hosted on NETWORK SOLUTION server, on clicking the submit button
    ------------------------------------------------------------------
    Server object error 'ASP 0177 : 800401f3'

    Server.CreateObject Failed

    /acesnet/fbv2.asp, line 20

    800401f3
    ------------------------------------------------------------------
    HERES THE CODE I USE
    ------------------------------------------------------------------
    <%
    Set Mail = Server.CreateObject("CDONTS.NewMail")
    Mail.Host = "mail.mydomain.net"
    Mail.From = "info@mydomain.net"
    Mail.FromName = "Website Enquiry "
    Mail.AddAddress "info@mydomain.net", "domain"
    Mail.AddCC "info@mydomain.net"
    Mail.Subject = "Kind Attention - Website Enquiry"
    Mail.Body = strbody2
    Mail.Body = "<HTML><HEAD><TITLE>Website Enrollement Form</TITLE></HEAD><BODY BGCOLOR=#FFFFFF><b>PRODUCTS A<BR><BR><b>Communication :</b> " & Request.form("com") & "<BR><BR><BR><b>PRODUCTS B<BR><BR><b>Signalling :</b> " & Request.form("sig") & "<BR><BR><BR><b>PRODUCTS C<BR><BR><b>Others :</b> " & Request.form("oth") & "<BR><BR><BR><b>Name :</b> " & Request.form("name") & "<BR><BR><BR><b>Company Name :</b> " & Request.form("cname") & "<BR><BR><BR><b>Designation :</b> " & Request.form("desig") & "<BR><BR><BR><b>Address 1:</b> " & Request.form("add1") & "<BR><BR><BR><BR><b>Address 2:</b> " & Request.form("add2") & "<BR><BR><BR><BR><b>STO CODE :</b> " & Request.form("contact")& "<BR><BR><BR><BR><b>Contact Number :</b> " & Request.form("contact2")& "<BR><BR><BR><BR><b>Email :</b> " & Request.form("email")& "<BR><BR><BR><BR><b>Details :</b> " & Request.form("details")& "<BR><BR><BR><BR></BODY></HTML>"
    Mail.IsHTML = True
    On Error Resume Next
    Mail.Send

    If Err <> 0 Then
    Response.Write "An error occurred: " & Err.Description
    End If
    ------------------------------------------------------------------

    please some help me in fixing this
    WR
    KLeen
     
    kleenideas, Oct 16, 2008 IP
  2. SearchBliss

    SearchBliss Well-Known Member

    Messages:
    1,899
    Likes Received:
    70
    Best Answers:
    2
    Trophy Points:
    195
    Digital Goods:
    1
    #2
    Just post line 20 on fbv2.asp where the problem is.
     
    SearchBliss, Oct 16, 2008 IP
  3. kleenideas

    kleenideas Peon

    Messages:
    3
    Likes Received:
    0
    Best Answers:
    0
    Trophy Points:
    0
    #3
    Set Mail = Server.CreateObject("CDONTS.NewMail")
     
    kleenideas, Oct 16, 2008 IP
  4. SearchBliss

    SearchBliss Well-Known Member

    Messages:
    1,899
    Likes Received:
    70
    Best Answers:
    2
    Trophy Points:
    195
    Digital Goods:
    1
    #4
    It appears that CDONTS is not supported. Try ASPMail. Search Google for "asp formmail" or "aspmail".
     
    SearchBliss, Oct 16, 2008 IP
  5. wacamoi

    wacamoi Peon

    Messages:
    810
    Likes Received:
    14
    Best Answers:
    0
    Trophy Points:
    0
    #5
    may try
    Server.CreateObject("CDO.Message")

    regards,
     
    wacamoi, Oct 17, 2008 IP
  6. jgarrison

    jgarrison Peon

    Messages:
    66
    Likes Received:
    0
    Best Answers:
    0
    Trophy Points:
    0
    #6
    CDONTS shouldn't be used. Here is an example using CDOSYS:

    <%

    Set oMail = Server.CreateObject("CDO.Message")
    Set oMailConfig = Server.CreateObject ("CDO.Configuration")

    oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
    oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
    oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
    oMailConfig.Fields.Update

    Set oMail.Configuration = oMailConfig
    oMail.From = "your-email@your-domain.com"
    oMail.To = "recipient@another-domain.com"
    oMail.Subject = "Here goes the email subject..."
    oMail.HTMLBody = "Here goes the email body..."
    oMail.Send

    Set oMail = Nothing
    Set oMailConfig = Nothing

    %>

    -Jim
     
    jgarrison, Oct 17, 2008 IP