Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ASP
 formulario envio a mail en .asp
 Foro Bloqueado  Tema Bloqueado


Autor Temas
capitank
Starting Member

Argentina
6 Posts
Mensajes - 30 Mar 2009 :  23:35:31  Ver Perfil  Enviar Email
formulario en .asp de envio a correo

--------------------------------------------------------------------------------
hola yo tengo un formulario ya hecho que funciona impecable ,pero en la parte de texto, para dejar un comentario abajo del todo , me gustaria que fuera mas grande, es que probe insertar un campo de texto pero no logro introducir en el .asp el codigo para que funcioe bien, alguien sabe como agregar ese paso, si me lo peuden modificar , gracias.Este formulario asi funciona muy bien ,pero nesecito un campo de comentario mas grande... seria este renglon , <td><input name="txtComentarios" type="text" id="txtComentarios" /></td>
reemplazarlo por un campo mas grande y corregir el envio_activa.asp ... una especie de text area, pero nesecito el codigo en el .asp. gracias ....

el codigo .html del formulario es:

<body>
<form action="envio_activa.asp" method="post">


<table width="400" height="395" border="5" align="center" cellpadding="2" cellspacing="0" bordercolor="#000000" class="borde">
<tr>
<td width="230"><span class="Estilo6 Estilo15">Sexo:&nbsp; </span></td>
<td width="144"><input name="txtSexo" type="text" id="txtSexo" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Ciudad:&nbsp;</span></td>
<td><input name="txtCiudad" type="text" id="txtCiudad" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Nombre real: <br />
</span></td>
<td><input name="txtreal" type="text" id="txtreal" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Nombre Fantasia: </span></td>
<td><input name="txtFantasia" type="text" id="txtFantasia" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Telefono Celular:&nbsp;</span></td>
<td><input name="txtTelefono" type="text" id="txtTelefono" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">E-Mail Privado:&nbsp;</span></td>
<td><input name="txtPrivado" type="text" id="txtPrivado" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">E-Mail que deseas publicar:&nbsp;</span></td>
<td><input name="txtpublicar" type="text" id="txtpublicar" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">viajes</span></td>
<td><input name="txtviajes" type="text" id="txtviajes" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Dias Disponibles:</span></td>
<td><input name="txtDias" type="text" id="txtDias" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Horarios Disponibles:</span></td>
<td><input name="txtHorarios" type="text" id="txtHorarios" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Idiomas:</span></td>
<td><input name="txtIdiomas" type="text" id="txtIdiomas" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Busto:</span></td>
<td><input name="txtBusto" type="text" id="txtBusto" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Cintura:</span></td>
<td><input name="txtCintura" type="text" id="txtCintura" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Cadera:</span></td>
<td><input name="txtCadera" type="text" id="txtCadera" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Altura:</span></td>
<td><input name="txtAltura" type="text" id="txtAltura" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Peso:</span></td>
<td><input name="txtPeso" type="text" id="txtPeso" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Color de piel:</span></td>
<td><input name="txtpiel" type="text" id="txtpiel" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Color de ojos:</span></td>
<td><input name="txtojos" type="text" id="txtojos" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Color de Pelo: </span></td>
<td><input name="txtPelo" type="text" id="txtPelo" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15"> Masajes: </span></td>
<td><input name="txtMasajes" type="text" id="txtMasajes" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Descripcion Personal:&nbsp;</span></td>
<td><input name="txtDescripcion" type="text" id="txtDescripcion" /></td>
</tr>
<tr>
<td><span class="Estilo6 Estilo15">Comentarios Adicionales:</span></td>
<td><input name="txtComentarios" type="text" id="txtComentarios" /></td>
</tr>
<tr>
<td>&nbsp;</td>
<td><input name="enviar" type="submit" id="enviar" value="enviar" /></td>
</tr>
</table>

y aca va el .asp :

<%

txtSexo = request.Form("txtSexo")
txtCiudad = request.Form("txtCiudad")
txtreal = request.Form("txtreal")
txtFantasia = request.Form("txtFantasia")
txtTelefono = request.Form("txtTelefono")
txtPrivado = request.Form("txtPrivado")
txtpublicar = request.Form("txtpublicar")
txtviajes = request.Form("txtviajes")
txtDias = request.Form("txtDias")
txtHorarios = request.Form("txtHorarios")
txtIdiomas = request.Form("txtIdiomas")
txtBusto = request.Form("txtBusto")
txtCintura = request.Form("txtCintura")
txtCadera = request.Form("txtCadera")
txtAltura = request.Form("txtAltura")
txtPeso = request.Form("txtPeso")
txtpiel = request.Form("txtpiel")
txtojos = request.Form("txtojos")
txtPelo = request.Form("txtPelo")
txtMasajes = request.Form("txtMasajes")
txtDescripcion = request.Form("txtDescripcion")
txtComentarios = request.Form("txtComentarios")
'Envio

Dim objNewMail
Set objNewMail = Server.CreateObject("CDO.message")
objNewMail.From = "contacto@paraisomodels.com"
objNewMail.To = "contacto@paraisomodels.com"
objNewMail.Subject = "Consulta desde el formulario"

txt = ""
txt = txt & " lo que quiero enviar " & "<br />" & "<br />"
txt = txt & " " & "<br />" & "<br />"
txt = txt & "Nombre: " & txtSexo & "<br />"
txt = txt & "Apellido: " & txtCiudad & "<br />"
txt = txt & "Edad: " & txtreal & "<br />"
txt = txt & "Signo: " & txtFantasia & "<br />"
txt = txt & "Descripcion: " & txtTelefono & "<br />"
txt = txt & "Nombre: " & txtPrivado & "<br />"
txt = txt & "Nombre: " & txtpublicar & "<br />"
txt = txt & "Nombre: " & txtviajes & "<br />"
txt = txt & "Nombre: " & txtDias & "<br />"
txt = txt & "Nombre: " & txtHorarios & "<br />"
txt = txt & "Nombre: " & txtIdiomas & "<br />"
txt = txt & "Nombre: " & txtBusto & "<br />"
txt = txt & "Nombre: " & txtCintura & "<br />"
txt = txt & "Nombre: " & txtCadera & "<br />"
txt = txt & "Nombre: " & txtAltura & "<br />"
txt = txt & "Nombre: " & txtPeso & "<br />"
txt = txt & "Nombre: " & txtpiel & "<br />"
txt = txt & "Nombre: " & txtojos & "<br />"
txt = txt & "Nombre: " & txtPelo & "<br />"
txt = txt & "Nombre: " & txtMasajes & "<br />"
txt = txt & "Nombre: " & txtDescripcion & "<br />"
txt = txt & "Nombre: " & txtComentarios & "<br />"
txt = txt & " ----------------------------------------------" & "<br />"

objNewMail.HTMLBody = txt

objNewMail.Send


'response.Write(txt)

response.redirect "envioOK.html"
%>


mariweb
Starting Member

Argentina
5 Posts
Posted - 14 Apr 2009 :  00:57:48  Ver perfil  Enviar e-mail
hola capitank
te paso la parte del codigo del formulario html.
<td><span class="Estilo6 Estilo15">Descripcion Personal:&nbsp;</span></td>
<td><textarea name="txtDescripcion" rows="5" id="txtDescripcion"></textarea></td>

yo trabajo en Dreamwever y ahí tiene las opciones para estos campos de textos que podes hacer por cantidad de letras, de renglones, por tamaño en pixel etc. y probé que funcione en mi servidor local y parece que funciona porque no se sale la pag de error, pero nunca recibí el mail con los datos (cambie la dir de email a la mia) vos si recibis el mail? en que servidor probas?
Saludos!
marianaInicio Pagina

   
 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