| [SOLVED] Can someone add in the programming needed to fix my ASP mailer? I'm using CDOSYS (CDO.Message). The mailer worked perfectly well on the other server, but now that I've switched servers, it's telling me that my SendUsing value is invalid. I don't know anything about setting up configuration. The website is www.cliqimaging.com, the Ip Address is 64.68.234.20. I don't even know the difference between the different sendusing values. Here's the programming:
<%
Option Explicit
Dim strBody, objMail
Dim sMsg
Dim sTo
Dim sFrom
Dim sSubject
Dim sTextBody
sFrom = "contact@cliqimaging.com"
sTo = "jbromwell@contactimaging.com"
sSubject = "Online Contact Request from CliqImaging.com Website"
sTextBody = strBody
strBody = "Request recieved at: " & Now() & vbCrLf & vbCrLf
strBody = strBody & "Name: " & Request("namef") & vbCrLf
strBody = strBody & "Address: " & Request("addressf") & vbCrLf
strBody = strBody & "City: " & Request("cityf") & vbCrLf
strBody = strBody & "State: " & Request("statef") & vbCrLf
strBody = strBody & "Zip: " & Request("zipcodef") & vbCrLf
strBody = strBody & "Daytime Phone: " & Request("dayphonef") & vbCrLf
strBody = strBody & "Evening Phone: " & Request("altphonef") & vbCrLf
strBody = strBody & "E-Mail Address: " & Request("emailf") & vbCrLf
strBody = strBody & "Service Interested In: " & Request("messagef") & vbCrLf
' Create an instance of the mail object and set its properties.
Set objMail = Server.CreateObject("CDO.Message")
objMail.From = sFrom
objMail.To = sTo
objMail.Subject = sSubject
objMail.TextBody = sTextBody
' Send the message
objMail.Send
' Set the object to nothing because it immediately becomes
' invalid after calling the Send method.
Set objMail = Nothing
%> |