
26/05/2004, 18:39
|
| | Fecha de Ingreso: diciembre-2002
Mensajes: 41
Antigüedad: 22 años, 5 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 |