justamente acababa de terminar de leer el post de
CDonts en XP, donde acaban de revivir ese mismo problema que tienes.
espero la lectura te sirva, todo indica que no tienes instalado el componente, de cualquier manera, pudieras utilizar este otro procedimiento
<% Option Explicit
Dim ObjetoMail
Set ObjetoMail=CreateObject("CDO.Message")
ObjetoMail.To = "
[email protected]" <<<--------------A quien
ObjetoMail.From = "
[email protected]" <<<<-----------De quien
ObjetoMail.Subject = "prueba de envio por asp" <<<------tu tema
ObjetoMail.HTMLBody =
cuerpo <<<--------------------contenido
ObjetoMail.Send
Set ObjetoMail=Nothing
%>
suerte