31/08/2004, 07:55
|
 | Colaborador | | Fecha de Ingreso: enero-2002 Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses Puntos: 146 | |
| Bueno, el campo tendría que estar en la tabla de usuarios, ya que este es el que va a tener el privilegio o no, y no tendrías que modificar la consulta, solo agregar un IF. Vamos a ver, supongo que en algún momento consultas la tabla de usuarios para verificar que el que se esta firmando sea un usuario válido:
sql = "SELECT * FROM Usuarios WHERE Idempleado="&request("Usuario")
Tabla.Open Sql, Conn
if Tabla.RecordCount > 0 Then ...
Bueno, pues en este momento si es válido, guardas en una variable el contenido del campo que acabas de agregar:
vStatus = Tabla("Status")
MMId = Tabla("IdEmpleado")
y solo condicionas las consultas que ya tienes:
if vStatus = 0 Then
sql = "SELECT * FROM Documento WHERE empleado="&MMId
Else
sql = "SELECT * FROM Documento"
End If
Saludos |