tspek
02-24-2010, 07:20 PM
I don't work in ASP, ever, I know essentially nothing about ASP specifically.
My company has a site that generates money (thus important) and when someone buys something we need to get an email about that order. The company that we paid to build the site years ago is no longer around. I've been searching high and low for some help with this but I'm not having any luck
The code below spits out this error: error '8004020f' and references the red line
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "localhost"
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "##OUR VALID EMAIL##"
.To = "##MY VALID EMAIL##"
.Subject = "Sample CDO Message"
.TextBody = "This is a test for CDO.message"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>
My company has a site that generates money (thus important) and when someone buys something we need to get an email about that order. The company that we paid to build the site years ago is no longer around. I've been searching high and low for some help with this but I'm not having any luck
The code below spits out this error: error '8004020f' and references the red line
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "localhost"
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "##OUR VALID EMAIL##"
.To = "##MY VALID EMAIL##"
.Subject = "Sample CDO Message"
.TextBody = "This is a test for CDO.message"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>