aqui?
Set objMail= Server.CreateObject("CDONTS.NewMail")
supongo que trabajarás en winXP o 2003. eso es que no tienes cdonts instalado.
tienes dos opciones:
1ª.- bajarte la librería cdonts de
Aquí e instalarla así:
copia cdonts.dll a c:\windows\system
en inicio->ejecutar, pon:regsvr32 cdontsl.dll
reinicia IIS
y ya está.
2ª.- (Y mucho mejor)-enviar el mail con cdosys. aquí te dejo un ejemplo:
Código:
strbody="<html>......"
strsubject="Título del mail"
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = strSubject
objMessage.Sender = emailremitente
objMessage.To = emaildestino
objMessage.HTMLBody =strBody
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
'también puedes borrar la línea de SMTP si pones sendusing=1
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objMessage.Configuration.Fields.Update
objMessage.Send
set objmessage=nothing
Hay otras opciones con componentes, pero para qué pagar cuando puedes tener lo mismo (o casi) gratis???