aca la respuesta(si lo ven conveniente ponerlo en el FAQ creo yo
):
<%
'*************************************
'mail al user
Set objmensaje= Server.CreateObject("CDO.Message")
set iConf = Server.CreateObject("CDO.Configuration")
set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\\inetpub\\mailroot\\pickup"
Flds.Update()
objmensaje.Configuration = iConf
ObjMensaje.from = "
[email protected]" 'correo que envia
ObjMensaje.To = "
[email protected]" ' a donde debe llegar el correo
ObjMensaje.Subject = "Tienes un mensaje desde correo website" ' titulocuenta de correo quien lo recibe
objmensaje.CreateMHTMLBody "http://www.correows.ws/boletin.asp"
ObjMensaje.Send
Set ObjMensaje = Nothing
%>