C
Cas
Hi,
I run IIS 5.0 on windows 2000 server sp4. This server is connected to the
ISP with adsl modem.
I put ASP code (found on internet) in order to send emails with CDO: (see
below)
When running that page, i get the error: "HTTP 500 - Internal server error
Internet Explorer"
No idea why.
I wonder whether the first 4 lines must be between comments.
Another point: do i need to install SMTP service of my IIS server, or (what
i think) can i use the SMTP service of my ISP?
Thanks
Cas
<!--
METADATA
TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library"
-->
<%
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "smtp_ of_ my_ ISP"
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "(e-mail address removed)"
.To = "(e-mail address removed)"
.Subject = "test with CDO"
.TextBody = "it works"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>
I run IIS 5.0 on windows 2000 server sp4. This server is connected to the
ISP with adsl modem.
I put ASP code (found on internet) in order to send emails with CDO: (see
below)
When running that page, i get the error: "HTTP 500 - Internal server error
Internet Explorer"
No idea why.
I wonder whether the first 4 lines must be between comments.
Another point: do i need to install SMTP service of my IIS server, or (what
i think) can i use the SMTP service of my ISP?
Thanks
Cas
<!--
METADATA
TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library"
-->
<%
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "smtp_ of_ my_ ISP"
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "(e-mail address removed)"
.To = "(e-mail address removed)"
.Subject = "test with CDO"
.TextBody = "it works"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>