Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ASP
 Problema al enviar un formulario htm ActiveMesseng
 Foro Bloqueado  Tema Bloqueado


Autor Temas
macsgv
Starting Member


7 Posts
Mensajes - 20 Jul 2006 :  20:54:30  Ver Perfil  Enviar Email
Hola a todos tengo un problema quiero enviar un formulario de consulta en htm por ASP con el componente de

mail que tiene mi servidor que es este: "ActiveMessenger.Message" . El Mail me lo manda con el encabezado

pero el cuerpo vacio sin texto, agradeceria que me ayudaran les dejo el codigo haber si me pueden ayudar con

algun ejemplo desde ya muchas gracias!!!


Tengo dos archivos uno del formulario buzon.htm y el otro que ejecuta el envio enviaMailASP_.asp aqui se los

dejo los codigos:


buzon.htm

<form action="sendMailASP_.asp" method="post" name="form2" id="form2">
<div align="center">
<p>&nbsp;</p>
</div>
<table border="0" align="center" cellspacing="5" bgcolor="#CCFFFF">
<tr>
<td align="right"><b>Nombre:</b></td>
<td><input name="nombre" type="text" id="nombre" size="50" maxlength="40"></td>
</tr>
<tr>
<td align="right"><b>E-Mail:</b></td>
<td><input type="text" name="email" size="50"></td>
</tr>
</table>
<div align="center"><br>
<b>Escribe aqui tu consulta </b><br>
<textarea name="Consulta" cols="50" rows="5" id="Consulta"></textarea>
<br>
<br>
<input name="submit" type="submit" value=" Enviar ">
&nbsp; &nbsp;
<input name="reset" type="reset" value=" Borrar ">
</div>
</form>


Y AQUI EL QUE ENVIA LOS RESULTADOS sendMailASP_asp

<%@ LANGUAGE="VBScript" %>
<%
' Create and initialize a message
Set Message = Server.CreateObject("ActiveMessenger.Message")
Message.Server = "smtp.ecolan.com"

' Set the sender information
Message.FromName = "info@nn.com.ar"
' Note that FromAddress must be present
Message.FromAddress = "info@nn.com.ar"

' Add the recipients
Message.Recipients.Add "info@nn.com.ar"
'Message.Recipients.Add "info@nn.com.ar"

' Copy my boss
'Message.CCs.Add "info@nn.com.ar"

' Set the message content
Message.Subject = "Consulta para Tua Imaxe"
Message.TextBody = "esto es una prueba"

' Send the message
On Error Resume Next
Message.Send
If Err.Number = 0 Then
Response.Write "<h1>Su Mensaje ha sido enviado pronto nos comunicaremos con usted Muchas

Gracias!!!</h1>"
Else
Response.Write "<h1>Error sus mensaje no fue enviado intentelo de nuevo!!!</h1>" & Err.Description
End If
On Error Goto 0
%>

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar