|    
			
				26/05/2004, 18:39
			
			
			  | 
  |   |  |  |  Fecha de Ingreso: diciembre-2002 
						Mensajes: 41
					 Antigüedad: 22 años, 10 meses Puntos: 0 |  | 
  |  Hola a todos Primero ke nada muchas pero muchas gracias por la solucion a mi problema "u_goldman" la probe y me resulto a la primera. Muchas gracias amigo.
 
 Bueno dennise_rb aki te mando un ejemplo de altas donde realizo ingresos con un checkbox espero te sirva, consta de dos paginas (ingreso.asp, grabar.asp)
 
 
 bueno el campo rs.Fields("Iva_internet") es de tipo si/no en mi BD, y es donde guardo la opcion del checkbox del formulario
 
 ingreso.asp ****
 
 <html>
 <head>
 <title>Untitled Document</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 </head>
 
 <body bgcolor="#FFFFFF" text="#000000">
 <table width="75%" border="1">
 <tr>
 <td>
 <form onSubmit="return valida()" name="form_iva" action="grabar.asp" method="post">
 <table width="100%" border="0" height="136" cellspacing="0">
 <tr>
 <td width="28%" height="11" bgcolor="eeeeee">Nombre</td>
 <td width="37%" height="11" bgcolor="eeeeee">Monto a Pagar</td>
 <td width="35%" height="11" bgcolor="eeeeee"> </td>
 </tr>
 <tr>
 <td width="28%" height="41">
 <input type="text" name="nombre">
 </td>
 <td width="37%" height="41">$
 <input type="text" name="valor_iva">
 </td>
 <td width="35%" height="41"></td>
 </tr>
 <tr>
 <td width="28%" height="9" bgcolor="eeeeee">Pagar por Internet </td>
 <td width="37%" height="9" bgcolor="eeeeee"> </td>
 <td width="35%" height="9" bgcolor="eeeeee"> </td>
 </tr>
 <tr>
 <td width="28%" height="27">
 <input type="checkbox" name="checkbox">
 </td>
 <td width="37%" height="27">  </td>
 <td width="35%" height="27"> </td>
 </tr>
 <tr>
 <td colspan="2" height="28" bgcolor="eeeeee">
 <input type="submit" name="Submit" value="Ingresar " style="color: #1e1977; border: 1px solid #1e1977; background-color: #FFFFFF">
 <input type="reset" name="Submit2" value="Borrar" style="color: #1e1977; border: 1px solid #1e1977; background-color: #FFFFFF">
 </td>
 <td width="35%" height="28" bgcolor="eeeeee"> </td>
 </tr>
 <tr>
 <td colspan="3" height="2"></td>
 </tr>
 </table>
 </form>
 </td>
 </tr>
 </table>
 </body>
 </html>
 **********
 graba.asp
 
 <html>
 <head>
 <title>Untitled Document</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 </head>
 
 <body bgcolor="#FFFFFF" text="#000000">
 <table width="75%" border="1">
 <tr>
 <td>
 <%
 if request.form("checkbox")= "" then
 var=0
 else
 var=1
 end if
 Set conn = server.createobject("ADODB.Connection")
 conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(mBaseDir & "/ruta de mi /bd/xxx.mdb")
 sql = "Select * from Tb_iva"
 
 Set rs = Server.CreateObject("ADODB.Recordset")
 rs.open sql, conn, 3, 3
 
 rs.AddNew
 rs.Fields("Iva_empresa") = request.form("nombre")
 rs.Fields("Iva_total") = request.form("valor_iva")
 rs.Fields("Iva_fechapago") = Date
 rs.Fields("Iva_internet") = var 'esta es la variable ke me guarda el estado del checkbox de mi formulario
 
 rs.Update
 
 
 %>
 <b><font color="#0033CC">
 <%
 Response.write "Ingreso fue efectuado Correctamente dennise_rb"
 Conn.Close
 set Conn = nothing
 %>
 </font></b> </td>
 </tr>
 </table>
 </body>
 </html>
   Última edición por cparra; 26/05/2004 a las 18:41
     |