Ver Mensaje Individual
  #2 (permalink)  
Antiguo 23/05/2002, 19:08
vetement
 
Fecha de Ingreso: septiembre-2001
Mensajes: 78
Antigüedad: 23 años, 7 meses
Puntos: 0
Re: Ejemplos Asp Mail Urgente

Hay va

strBody = "<b>Algun Titulo</b><br> <br>"
strBody = strBody & "<br><b>Nombre: </b>" & snombre
strBody = strBody & "<br><b>Teléfono: </b>" & stelefono
strBody = strBody & "<br><b>Dirección: </b>" & sdireccion
strBody = strBody & "<br><b>Empresa: </b>" & sempresa
strBody = strBody & "<br><b>Ramo: </b>" & ramo
strBody = strBody & "<br><b>E-mail: </b>" & semail
strBody = strBody & "<br><b>Productos: </b>" & sproductos
strBody = strBody & "<br><b>Comentarios: </b>" & scomentarios

set oMail=Server.CreateObject("CDONTS.NewMail&quo t;)
oMail.From = x@mail 'alguna variable que contenga el email
oMail.To = "[email protected]"
oMail.Subject = "Titulo Subject"
oMail.BodyFormat = 0
oMail.MailFormat = 0
oMail.Body = strBody
oMail.Importance = 0
oMail.Send
set oMail = nothing
'set objrst = nothing

Con este basta yo creo
Saludos!