como estan??
pues aqui les escribo de nuevo con una preguntilla
tengo unos registros que muestro como en el hotmail
todos tienen un check box con el numero de id
los puedo borrar muy bien, gracias a que aqui encontre el codigo de como hacerle
pero ahora tengo que hacer un log de, que si borro, actualizo o agrero, tengo ke guardar en una bd
lo puedo hacer cuando nada mas elimino un registro, pero como le hago cuando elimine mas de 1 registro, como hago el query???
o tengo que contar los checkbox que se checaron?
tengo el codigo aqui
Código PHP:
'Variables del LOG
Dim usuario_log
usuario_log = Trim(Request("usuario"))
Dim espacio
espacio = ", "
Dim OPERACION_LOG
OPERACION_LOG = Trim(Request("operacion"))
if OPERACION_LOG = 20 then
OPERACION_LOG = "BAJA"
DATO_ACTUAL = "Transacción Eliminada"
end if
Dim FECHA_LOG
FECHA_LOG = Trim(Request("fecha"))
Dim Id_Transaccion
Id_Transaccion = Trim(Request("eliminar"))
if Id_Transaccion = "" then
Response.Write "<script>alert('Por favor seleccione una Transacción a borrar')</script>"
Response.Write "<script languaje='JavaScript'>"
Response.Write "location.href='Filtro_Transacciones.asp';"
Response.Write "</script>"
else
Dim dato_anterior
dato_anterior = Trim(Request("eliminar"))
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "IntraDEOP","IntraDEO", "deop"
'insertar datos para el log
srtSQL1 = "INSERT INTO IO_Log_Perfiles (perfil,usuario,operacion,fecha,datos_anteriores,datos_actuales) "& _
" VALUES 'Transacción','"&usuario_log&"','"&operacion_log&"','"&fecha_log&"','"&dato_anterior&"','"&dato_actual&"')"
Conn.Execute(srtSQL1)
'datos para eliminar
srtSQL = "DELETE from IO_PAccesos_Transacciones where Id_Transaccion in("& Id_Transaccion & ")"
Conn.Execute(srtSQL)
end if
Response.Write "<script>alert('La Transacción Fue Borrada')</script>"
Response.Write "<script languaje='JavaScript'>"
Response.Write "location.href='Filtro_Transacciones.asp;"
Response.Write "</script>"
%>
