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
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