form en asp, flash y cdont

[chaval]

Estoy Armando un form con flash y asp usando cdonts porque el host no soporta casi nada incluido aspmail y tengo este codigo:

Código:

<% @language="VBSCRIPT" %> 
<%

Dim myMail, myBody
 
myBody = "- Nombre: "& vbcrlf & request.form("nombre") & vbcrlf & vbcrlf
myBody = myBody & "- Email: "& vbcrlf & request.form("email") & vbcrlf & vbcrlf
myBody = myBody & "- Empresa: "& vbcrlf & request.form("empresa") & vbcrlf & vbcrlf
myBody = myBody & "- Mensaje: "& vbcrlf & request.form("mensaje")

Set myMail = CreateObject("CDONTS.NewMail")

myMail.BodyFormat=1
myMail.MailFormat=1
myMail.From=request.form("email")
myMail.To="[email protected]"
myMail.Cc="[email protected]"
myMail.Bcc="[email protected]"
myMail.Subject="Form desde mi WEB"
myMail.Body=myBody
myMail.Send

set myMail=nothing

%>
 

A los mails llega todo en texto plano y como pueden ver, lo unico que se me ocurrió hacer, como para diferenciar un poco la información, es usar vbcrlf para que llegue asi:

Código:

- Nombre:
Chaval

- Email:
[email protected]

- Empresa:
Chaval SRL

- Mensaje:
Texto texto texto texto texto texto texto texto texto texto

En definitiva yo quisiera es remarcar los títulos pra que aun sea mas clara la información que llega:

Código:

- Nombre:
Chaval

- Email:
[email protected]

- Empresa:
Chaval SRL

- Mensaje:
Texto texto texto texto texto texto texto texto texto texto

¿Alguien me puede dar una idea?, desde ya mil gracias.

[LeCLUB]

dale formato HTML al email, y podrás hacer todo lo que se te antoje, tablas, imágenes, formato de texto, etc etc etc

Aquí tienes un Hilo que habla sobre el tema:

http://www.forosdelweb.com/f15/enviar-mail-con-formato-html-con-cdo-210929/

[chaval]

Gracias LeCLUB, ya le voy encontrando la solución, aca posteo completo que es lo que hice hasta ahora por si a alguien le sirve.

Código:

<% @language="VBSCRIPT" %> 
<%

Dim myMail, myBody

myBody = "<table width='400' border='1'>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & "Nombre: "
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & request.form("nombre")
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & "Email: "
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & request.form("email")
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & "Empresa: "
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & request.form("empresa")
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & "Mensaje: "
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "<tr>"
myBody = myBody & "<td>"
myBody = myBody & request.form("mensaje")
myBody = myBody & "</td>"
myBody = myBody & "</tr>"

myBody = myBody & "</table>"

Set myMail = CreateObject("CDONTS.NewMail")

myMail.BodyFormat=0
myMail.MailFormat=0
myMail.From=request.form("email")
myMail.To="[email protected]"
myMail.Cc="[email protected]"
myMail.Bcc="[email protected]"
myMail.Subject="Form desde mi WEB"
myMail.Body=myBody
myMail.Send

set myMail=nothing

%>

[Daerion]

Ja! Buenas beunas!
Pregunto: ¿esto que has enviado se vincula con algun otro archivo?

Shaluditos!!!!

[chaval]

y si, eso que mande es un archivo asp (contacto.asp) tenes que crear otro archivo (html, flash o lo que sea) con un formulario y de ahi lo llamas.
En Flash por ejemplo en el boton enviar yo use:

Código:

on (release) {
getURL("contacto.asp", "", "POST");
}