Hola Jocan, ya resolvi el problema...
La cosa pasaba por como terminaba las lineas de código, yo las terminaba con un <br> pero eso no es un final de linea, solamente le dice al html que escriba en la linea de abajo,y me generaba una cadena que nadie podia procesar...
Para teminar las lineas hay que hacerlo con vbNewLine , problema terminado.
Te paso el cdigo que uso yo para el envio con cdosys, ojo que solo funciona en servidores win2000 winXP y win2003.
<%
'<<<>>> Funcion de envio de mails <<<>>>
function SendEmail
on error resume next
Dim iMsg,iConf,Flds, TextoCuerpo, Cli_Mail
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
With Flds
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.server.com" 'aca va el server de salida
.Update
End With
With iMsg
Set .Configuration = iConf
.To ="
[email protected]" ' el mail del destinatario
.From = "
[email protected]" 'el mail de evio
.Subject = "Novedades "
' .TextBody = mensaje 'en modo texto
.htmlBody = mensaje 'en modo html
.Send
End With
end function
%>