ayuda con un e-mail
Publicado por oscar (1 intervención) el 09/06/2005 23:52:24
Muy wenas gente tengo un problema a la hora de enviar un correo, yo tengo hecgo un carrito de la compra y necesito enviar el carrito final por correo.
yo meto en una variable toda la informacion de la tabla
<%
strbody= "<table border=1 bordercolor=#333366>" & _
"<tr><td align=center> <strong>PRODUCTO</strong> </td>" & _
"<td align=center><strong>CANTIDAD</strong> </td>" & _
"<td align=center><strong>PRECIO</strong></td>" & _
"</tr>"
strTR= "<tr><td align=center>"
strTD = "</td><td align=center>"
strTDR = "</td></tr>"
strbody=strbody & strTR & rsProducto("Descripcion") & strTD & session("cesta")(x,1) & strTD & _
session("cesta")(x,1) * rsProducto("pvp")& " € " & strTDR
%>
vale hasta aqui todo esta bien, el enredos en a la hora de enviarlo que lo hago de la siguiente forma:
<%
dim strbody, objMail
strbody=request.Form("strbody")
Set objMail=server.createObject("cdonts.Newmail")
objmail.from="xxx"
objmail.to= "xxx"
objmail.body=strbody
objmail.send
set objmail=nothing
response.Write("El mensaje se ha enviado")
%>
si lo envio asi me llega todo el codigo que yo meti en la variable, y si copio ese codigo a una pagina si me sale la tabla, pero yo quiero que salga directamente en el correo y si lo mando con el objeto CDO y poniendo objmail.htmlbody=strbody me da un fallo y me dice:
No es valido el valor de configuracion del "SendUsing".
Espero que alguien me pueda decir pork pasa esto y me pueda decir la forma de enviar la tabla correctamente.
Un saludo
yo meto en una variable toda la informacion de la tabla
<%
strbody= "<table border=1 bordercolor=#333366>" & _
"<tr><td align=center> <strong>PRODUCTO</strong> </td>" & _
"<td align=center><strong>CANTIDAD</strong> </td>" & _
"<td align=center><strong>PRECIO</strong></td>" & _
"</tr>"
strTR= "<tr><td align=center>"
strTD = "</td><td align=center>"
strTDR = "</td></tr>"
strbody=strbody & strTR & rsProducto("Descripcion") & strTD & session("cesta")(x,1) & strTD & _
session("cesta")(x,1) * rsProducto("pvp")& " € " & strTDR
%>
vale hasta aqui todo esta bien, el enredos en a la hora de enviarlo que lo hago de la siguiente forma:
<%
dim strbody, objMail
strbody=request.Form("strbody")
Set objMail=server.createObject("cdonts.Newmail")
objmail.from="xxx"
objmail.to= "xxx"
objmail.body=strbody
objmail.send
set objmail=nothing
response.Write("El mensaje se ha enviado")
%>
si lo envio asi me llega todo el codigo que yo meti en la variable, y si copio ese codigo a una pagina si me sale la tabla, pero yo quiero que salga directamente en el correo y si lo mando con el objeto CDO y poniendo objmail.htmlbody=strbody me da un fallo y me dice:
No es valido el valor de configuracion del "SendUsing".
Espero que alguien me pueda decir pork pasa esto y me pueda decir la forma de enviar la tabla correctamente.
Un saludo
Valora esta pregunta


0