Hola, U_goldman, lei la liga q mandaste pero como no se mucho ingles hice lo q pude, copie el codigo que viene ahi para probarlo y nada =(, que es lo que deberia de ir en -> "<enter_mail.server_here>" ??????
La version de IIS que tengo es el 5.1 en windows xp Profesional, y lo tengo local, tendre que agregar o configurar algo ??
<%
sch = "http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(sch & "sendusing") = 2 ' cdoSendUsingPort
.Item(sch & "smtpserver") = "<enter_mail.server_here>"
.update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "
[email protected]"
.To = "
[email protected]"
.Subject = "Sample CDO Message"
.TextBody = "This is a test for CDO.message"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>