RESTA desde formulario

8461277 · #1 (**permalink**) 25/01/2003, 06:52

Señores del foro, tengo la siguiente progunta como puedo restar un numero que mando por un formulario hacia una bd en donde se encuentra otro numero y el resultado de dicha resta quede grabado en ese mismo campo (cantidad) el codigo que estoy utilizando es este pero no me da, que sucede:

CODIGO:

<html>
<body>
<%
'Declaracion de variables
Dim Obj_Conn
Dim Obj_RS
Dim codigo
Dim cantidad
Dim strSQL

'Fin declaracion de variables

codigo = Request.Form ("codigo")
cantidad = Request.Form ("cantidad")

SET Obj_Conn = Server.CreateObject("ADODB.Connection")

Obj_Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\inetpub\asp\graciela.mdb;"

'Suponiendo que la Tabla se llamada PRODUCTO y el campo codigo, comprobamos que producto existe.
strSQL = "select codigo from Producto where codigo = "&codigo&" ; "
'strSQL = "select cantidad from Producto where codigo = "&codigo&" ; "
SET Obj_RS = Obj_Conn.Execute(strSQL)

IF NOT Obj_RS.EOF THEN
'resultado = Cint(Obj_Rs("Cantidad"))-Cint(Request.Form ("cantidad"))

SQL = "update Producto set cantidad=Cantidad-Request.Form (cantidad) where codigo = "& Obj_RS("codigo") & " ;"
'SQL = "update Producto set Cantidad="& resultado &" where codigo = "& Obj_RS("codigo")& " ;"
response.write "sql actualiza=" & SQL
Obj_Conn.Execute(SQL)
response.write "Los datos del PRODUCTO se han actualizado correctamente"
ELSE
response.write "El usuario EL PRODUCTO en la base de datos"
END IF
Obj_RS.Close
Obj_Conn.Close
SET Obj_RS = Nothing
SET Obj_Conn = Nothing
%>

</body>
</html>
POR FAVOR PUEDEN AYUDARME

8461277 · #2 (**permalink**) 25/01/2003, 07:19

Gracias por su atencieones, ya lo logre, me tendran por aqui pronto con otras perguntas

Miguel desde venezuela.................