¿cómo envio formulario?
Publicado por Ms (1 intervención) el 18/04/2007 13:08:55
Hola,
He hecho varios formularios con el programa DREAMWEAVER y tengo problemas para que una vez se rellenen sean enviados. He utilizado CGI, ASP y mail, pero sólo éste último método funciona (y no es el mejor precisamente).
¿Alguien puede ayudarme?. Podeis enviarme un mail a: [email protected].
A continuación os muestro lo que he puesto con ASP:
Para el formulario he creado dos páginas: una en html para rellenarlo y otra en asp para enviarlo, pero no sucede nada.
Este es el código de cada una:
formulario htm:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>formulario</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<form name="form" method="post" action="formulario.asp">
<table width="400" border="0" cellspacing="2" cellpadding="2">
<tr>
<td width="200" valign="top" align="right"> Nombre: </td>
<td width="200" valign="top" align="left">
<input type="text" name="name" size="25" maxlength="200" />
</td>
</tr><tr>
<td width="200" valign="top" align="right">Email: </td>
<td width="200" valign="top" align="left">
<input type="text" name="email" size="25" maxlength="100" />
</td>
</tr><tr>
<td width="200" valign="top" align="right">Comentarios: </td>
<td width="200" valign="top" align="left">
<textarea name="msg" cols="25" rows="4"></textarea>
</td>
</tr><tr>
<td width="200" valign="top"><input type="hidden" name="recipient"[email protected]">
<p>
<input type="hidden" name="subject"value="datos">
</p>
<input type="hidden" name="redirect"value="http://www.msanchezgrafisme.com/gracias.htm></td>
<td width="200" valign="top" align="left">
<input type="submit" name="Reset" value="Enviar" />
<input type="reset" name="Submit" value="Deshacer" /></td>
</tr>
</table>
</form>
formulario.asp:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
<%
Recogemos los datos del formulario
de = request.form ("de")
para = request.form ("para")
mensaje = request.form ("mensaje")
asunto = request.form ("asunto")
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.msanchezgrafisme.com"
Mail.From = de
Mail.AddAddress "[email protected]"
Mail. Subject = asunto
'El mensaje en formato html
Mail.IsHTML = True
Mail.Body = "<HTML><body><font face=verdana size=2>De : "&de&"<br>Men"&mensaje&</p><br>Enviado el "&Now() &</font></body>
</html>
On Error Resume Next
Mail.Send
If Err<> 0 Then
Response.Write "Ha ocurrido el siguiente error: "&Err. Description End If
%>
He hecho varios formularios con el programa DREAMWEAVER y tengo problemas para que una vez se rellenen sean enviados. He utilizado CGI, ASP y mail, pero sólo éste último método funciona (y no es el mejor precisamente).
¿Alguien puede ayudarme?. Podeis enviarme un mail a: [email protected].
A continuación os muestro lo que he puesto con ASP:
Para el formulario he creado dos páginas: una en html para rellenarlo y otra en asp para enviarlo, pero no sucede nada.
Este es el código de cada una:
formulario htm:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>formulario</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<form name="form" method="post" action="formulario.asp">
<table width="400" border="0" cellspacing="2" cellpadding="2">
<tr>
<td width="200" valign="top" align="right"> Nombre: </td>
<td width="200" valign="top" align="left">
<input type="text" name="name" size="25" maxlength="200" />
</td>
</tr><tr>
<td width="200" valign="top" align="right">Email: </td>
<td width="200" valign="top" align="left">
<input type="text" name="email" size="25" maxlength="100" />
</td>
</tr><tr>
<td width="200" valign="top" align="right">Comentarios: </td>
<td width="200" valign="top" align="left">
<textarea name="msg" cols="25" rows="4"></textarea>
</td>
</tr><tr>
<td width="200" valign="top"><input type="hidden" name="recipient"[email protected]">
<p>
<input type="hidden" name="subject"value="datos">
</p>
<input type="hidden" name="redirect"value="http://www.msanchezgrafisme.com/gracias.htm></td>
<td width="200" valign="top" align="left">
<input type="submit" name="Reset" value="Enviar" />
<input type="reset" name="Submit" value="Deshacer" /></td>
</tr>
</table>
</form>
formulario.asp:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
<%
Recogemos los datos del formulario
de = request.form ("de")
para = request.form ("para")
mensaje = request.form ("mensaje")
asunto = request.form ("asunto")
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.msanchezgrafisme.com"
Mail.From = de
Mail.AddAddress "[email protected]"
Mail. Subject = asunto
'El mensaje en formato html
Mail.IsHTML = True
Mail.Body = "<HTML><body><font face=verdana size=2>De : "&de&"<br>Men"&mensaje&</p><br>Enviado el "&Now() &</font></body>
</html>
On Error Resume Next
Mail.Send
If Err<> 0 Then
Response.Write "Ha ocurrido el siguiente error: "&Err. Description End If
%>
Valora esta pregunta
0