Ver Mensaje Individual
  #1 (permalink)  
Antiguo 22/06/2004, 09:48
Avatar de umdraiga
umdraiga
 
Fecha de Ingreso: diciembre-2001
Ubicación: Aragón España
Mensajes: 128
Antigüedad: 23 años, 6 meses
Puntos: 0
codigo asp para recogida de datos

Hola amig@s:
He creado (no sin esfuerzo) un formulario para que los campos me sean enviados por email a mi correo. Pero claro, la alegría no iba a ser completa. Veréis cuando esté completado el formulario habrá campos obligatorios y otros no.
Mi solicitud de ayuda es la siguiente:(pongo el código más abajo)

A mí me gustaría recibir en el correo los datos introducidos en los campos con el nombre de la variable . es decir que en el correo apareciera:
Nombre: Los datos introducidos1
Apellidos: Los datos introducidos2
Ahora sólo me parece en una línea
los datos introducidos1
Pongo el código
Ah y gracias
<html>
<head>
<title>prueba de formulario</title>.
</head>
<body topmargin="0" bgcolor="#999866">
<p align="center" style="margin-top: 0; margin-bottom: 0"><b>FORMULARIO </b></p>
<%
if request.form="" then
%>
<form method="post" action="prueba.asp" onSubmit="return verificarFormu(this)">
<table border="0" cellspacing="1" width="100%" id="AutoNumber1" style="text-align: center">
<tr>
<td width="50%">
<p align="right"><font size="2">Nombre </font></td>
<td width="50%" style="text-align: left">
<input type="text" name="Nombre*" size="35"></td>
</tr>
<tr>
<td width="50%">

<input type="submit" value="Enviar" style="float: right" ></td>
<td width="50%" style="text-align: left">

&nbsp;<button name="Borrar" type="reset">
Borrar
</button>&nbsp;</td>
</tr>
</table>
</form>
<%
else
wNombre=Request.Form("Nombre")



wTexto = wNombre

%>
<h2>
<%

set correo=Server.CreateObject("CDONTS.NewMail")
correo.From ="[email protected]"
correo.To = "[email protected]"
correo.Subject="Formulario "
correo.Body= wTexto
correo.mailFormat = 0
correo.Send
set correo= Nothing
Response.Write "Gracias por rellenar el Formulario. "

end if
%> </h2>
</body>

</html>
__________________
http://www.umdraiga.com
Una causa justa :arriba: