Ver Mensaje Individual
  #27 (permalink)  
Antiguo 22/05/2006, 14:03
Avatar de karmish
karmish
 
Fecha de Ingreso: mayo-2006
Mensajes: 272
Antigüedad: 19 años
Puntos: 1
Estimado Tammander con este codigo

Código:
<%
valor = CInt(len(Request.Form("checkbox")) > 0) * -1

set con = Server.CreateObject("ADODB.Connection")
     set rs = Server.CreateObject("ADODB.RecordSet")

      con.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mes/galerias/galerias.mdb")
      SQL = "UPDATE pizarra SET valor = "  & valor & " where valor like '%"&valor&"%';"
      
     on error resume next
     con.execute(SQL)
     if err.number <> 0 then
           response.write("Error: " & err.description)
           response.flush()
     else
           con.close()
           set con = nothing
           on error goto 0
           Response.Redirect("modificadormural.asp")
     end if
%>
no me actualiza nada ne la base de datos