Ver Mensaje Individual
  #1 (permalink)  
Antiguo 18/04/2007, 23:44
K-anario
 
Fecha de Ingreso: abril-2006
Mensajes: 123
Antigüedad: 19 años
Puntos: 0
por que no funciona ...

Este formulario me envia a un asp que tengo metido en el mismo lugar del directorio y se llama guardadatos.asp(al final pongo el codigo)



<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN//3.0">
<HTML>
<HEAD><TITLE></TITLE>
</HEAD>
<BODY text="#FFFFFF" bgcolor="#800000">


<FORM ACTION="guardadatos.asp" METHOD=post>


<p align="right"><font face="Verdana" size="1">tupeluqueriacanina.com</font></p>
<p align="center"><font face="Verdana" size="5">Rellena el siguiente formulario<br>
</font><font face="Verdana" size="4">para añadir a tu mascota<BR>

</font></p>
<p align="center"><u><font face="Roman" size="5">Datos del Animal</font></u></p>
<table border="1" width="100%" id="table1">
<tr>
<td align="center"><font face="Verdana">

Especie:
<SELECT NAME="especie" id="especie">
<OPTION> Perro o Gato</OPTION>
<OPTION VALUE="Perro">Perro
<OPTION VALUE="Gato">Gato
</SELECT>
</font></font></td>

<td align="center"><font face="Verdana">

Email del Contacto: <font size="3">
<INPUT TYPE="Text" NAME="Email de Contacto" SIZE=28></font> </font></p>
<p align="center"><font face="Verdana"><BR>
<font size="3">

<INPUT TYPE="Submit" NAME="enviar" VALUE="Enviar" SIZE=8></font><BR><BR>
&nbsp; </font></p>
</FORM>

</BODY>
</HTML>
guardardatos.asp

<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN//3.0"><HTML>
<HEAD><TITLE> Conformidad de datos </TITLE></HEAD>
<BODY>
<%
Especie = Request.Form("especie")
Email del Contacto = Request.Form("email del contacto")

Set con = Server.CreateObject("ADODB.Connection")
con.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mdb\animalesperdidos.mdb"))


sql= "INSERT INTO datos(Especie, Email del Contacto)"
sql = sql & "VALUES('"&Especie&"' , "&Email del Contacto&"')"

con.Execute(sql)
%>

Animales Perdidos<p>Especie: <% = Request.Form("especie") %><BR>
Email del Contacto: <% = Request.Form("Email del Contacto") %><BR><BR>

Sus datos están almacenados en nuestra base de datos.<BR><BR>
<%
If Err = 0 Then
Response.Write "Inserción correcta"
Else
Response.Write "Error de datos"
End If
con.Close
Set con=Nothing
%>


<SCRIPT LANGUAGE="JavaScript"><!--
document.write("<CENTER>");
document.write("<FORM NAME=\"History\">");document.write("<INPUT TYPE=\"BUTTON\" VALUE=\"<< Volver a la página anterior\" onClick=\"history.back()\">");document.write("</FORM>");
document.write("</CENTER>");
// -->
</SCRIPT>



</p>



<HR>
</BODY>
</HTML>