Can anybody tell me why I'm getting this error:
Server.CreateObject Failed
The error is taking place @
Dim mailObj
Set mailObj = Server.CreateObject("CDONTS.NewMail")
With mailObj
.From = strFrom
.To = strTo
.Subject = strSubject
.Body = strBody
.Send
End With
Set mailObj=nothing
here's the complete code, besides the HTML that I cut out.
<%
strFrom = Request.Form("from")
strTo = "somebody@hotmail.com"
strSubject = "Licensing Problem!"
strBody = "This problem has been submitted on " & Now() & "." & vbCrLF & vbCrLF
strBody = strBody & "Name: " & Request.Form("name") & " (Phone Num. " & Request.Form("phone_num") & ")" & vbCrLF & vbCrLF
strBody = strBody & "Issue/Problem: " & vbCrLf & Request.Form("problem") & vbCrLF
'New Code
Dim mailObj
Set mailObj = Server.CreateObject("CDONTS.NewMail")
With mailObj
.From = strFrom
.To = strTo
.Subject = strSubject
.Body = strBody
.Send
End With
Set mailObj=nothing
%>