| |||
Re: Sumar mediante un form a un numero de una bd >Hola, quiero hacer que mediante un form el >número elegido se sume al número que tenga >una bd. He intentado hacerlo de muchas >formas pero no soy capaz, alguien me ayuda? * crea el form * crea el input * pasa el parametro del input a otra pagina * en esa pagina abre la base de datos y selecciona el campo al que le quieres sumar el valor del input. * sumalos * vuelve a guardar el valor del resultado en campo de la base de datos. Esa es la idea. Hay muchas maneras de hacer esto, ya sea sin cambiar de pagina, cambiando... Sobretodo, el campo de la base de datos ha de ser numerico, sino no podras sumarle el valor del input. Un saludo. Ideafix. |
| ||||
Re: Sumar mediante un form a un numero de una bd Bien, tengo esto, en que me confundo? <%voto=request.form("1") id=request.form("id") Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/asesinos.mdb")) strsql = "SELECT * FROM asesinos WHERE id = '" & id & "'" set rs=createobject("ADODB.Recordset") RS.open strsql, oConn, 3, 3 rs.open strsql,conn rs("voto")=rs("voto")+voto rs.update %> El imput del cual se recoge el dato es un radiobutton cuyo valor es numérico |
| |||
Re: Sumar mediante un form a un numero de una bd prueba a llamar de otra forma el campo del formulario : voto = request.form("1") <- sustituye el "1" por el nombre del radiobutton Aunque creo que lo que te sucede es que intentas llamar al value del raddiobutton, me ekivoko??? lo que deberas hacer es comprobar el radio seleccionado y en funcion de este sumarle un valor o otro al campo de la bd. A ver si con esto vamos avanzando un pokito. Ideafix. |
| |||
Re: Sumar mediante un form a un numero de una bd hola ami me pasaba algo parecido y lo he solucionado sacando antes de hacer la suma lo que tenia en el campo de la base de datos y despues sumarlo, no se si me explico aaqui te pongo un ej. set cnn = Server.CreateObject("ADODB.Connection") set rst = Server.CreateObject("ADODB.RecordSet") cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Da ta Source=" & Server.MapPath("\votaciones.mdb")) sqltext = "SELECT * FROM votacion" rst.Open sqltext,cnn,3,3 if Request.Form("r1")="Muy Buena" then 'Si está ha votado muy buena entonces le sumamos uno 'guardados des el valor q hay en la bd guardados=rst("muybuena") rst("muybuena") = guardados+1 rst.update end if cnn.Close Set cnn = Nothing ;) Suerte |