Ver Mensaje Individual
  #38 (permalink)  
Antiguo 18/10/2007, 15:00
Avatar de u_goldman
u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 4 meses
Puntos: 98
Re: Actualizar campo Si/No

A ver:

Código:
<input <%if RS("Camp2") = "True" Then Response.Write("checked") End if%> TYPE="checkbox" NAME="checkbox" value="1" />
Código:
if len(request.form("checkbox")) > 0 then
   Ptr = 1
else
   Ptr = 0
end if

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open = MM_cnx_STRING

sql = "UPDATE Tabla1 SET Ptr = "&Ptr&" WHERE Id= "&Request.QueryString("Id")&""
set RS = Conn.Execute(sql)
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway