18/06/2004, 02:09
|
 | | | Fecha de Ingreso: febrero-2003 Ubicación: en elgun lugar del cyberespacio
Mensajes: 118
Antigüedad: 22 años, 3 meses Puntos: 0 | |
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
%>
__________________
CHAVAL
Buenos Aires, Argentina, América, La Tierra,
Via Lactea, Universo Tridemensional... :pensando:
Última edición por chaval; 18/06/2004 a las 10:12 |