Ver Mensaje Individual
  #10 (permalink)  
Antiguo 06/06/2005, 02:47
Avatar de Slot
Slot
 
Fecha de Ingreso: marzo-2005
Mensajes: 39
Antigüedad: 20 años, 2 meses
Puntos: 0
Hay gente que me dice que no lo pueden mandar, yo lo he probado y la verda es un poco coñazo se te abre el Outlook, y hay gente que no lo utiliza porque no lo tiene configurado .....eso cuando pongo mailito:[email protected] .
Si lo pongo a traves de un asp ="/correo/mail.asp en toces manda el correo pero me llega en blanco no he encontrado nada donde lo espliquen bien, la idea era de cambiarlo porque parecia sencillo pero veo que no es tan sencillo como parece, si he conseguido que me llege uno relleno en el asunto y el detalle, de esta forma :

<%

Dim strAsunto
Dim strMensaje
Dim objCDOMail 'El objecto CDO

'Primero leemos los datos del formulario y los asignamos a las variables

strAsunto = Request.Form("tit") ' he creado un cambo que se llama tit y me lo muestra en el asunto
strMensaje = Request.Form("pre") ' y aquí he creado un campo que se llama pre y me lo muestra en mensaje ( pero si le pongo cualquiera del frmulario que tengo no llega, no lo entiendo ¿?

'Creamos una instancia del objeto NewMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")

'Asignamos las propiedades al objeto
objCDOMail.From = "formularioEncuesta"
objCDOMail.To = "[email protected]"
objCDOMail.Subject = strAsunto
objCDOMail.Body = strMensaje
'Finalmente enviamos el mensaje
objCDOMail.Send

'Tenemos que poner la propiedad Nothing al objeto ya que inmediatamente se vuelve invalido
'y libera la memoria del servidor
Set objCDOMail= Nothing
response.Write "¡Formulario enviado!"
%>