Ver Mensaje Individual
  #9 (permalink)  
Antiguo 06/01/2009, 17:49
Avatar de luisvasquez
luisvasquez
 
Fecha de Ingreso: diciembre-2003
Ubicación: Venezuela
Mensajes: 879
Antigüedad: 21 años, 4 meses
Puntos: 6
Respuesta: Formulario HTML y base de datos

Aca puedo ponerte el formulario más básico que se me ocurre. A partir de alli puedes hacer lo que necesitas.


Código:
<% 

' Si es primera vez que entra a la página muestra el formulario para tomar los datos

if request.Form = "" then 

%>
   <form action="" method="post" name="pagos">
   <input name="x_campo1" type="text"  value="" />
   <input name="x_campo2" type="text"  value="" />
   <input name="x_campo3" type="text"  value="" />
   <input name="x_campo4" type="text"  value="" />
   <input type="submit" name="button" id="button" value="Enviar" />
   </from>

<% else ' Si la forma ya está llena, es decir request.form <> "" procede a actualizar la B/D

' recoge los datos del formulario en variables
  campo1 = request.form("x_campo1")
  campo2 = request.form("x_campo2")
  campo3 = request.form("x_campo3")
  campo4 = request.form("x_campo4")

 
' Abre la base de datos

  set cnn = Server.CreateObject("adodb.connection")
  set rs  = server.CreateObject("adodb.recordset")
  xDb_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("mi_base.mdb")&";"
  cnn.open xDb_Conn_Str  
  sql = "Insert into tabla   (campo_bd1,campo_bd2,campo_bd3,campo_bd4)  values ('"& campo1 &"','"& campo2 &"','"& campo3 &"','"& campo4 &"') ' Inserta en la B/D las variables tomadas del formulario
  cnn.execute sql
		
End if

%>
Saludos,
Luis