didlem

emperador20 respondió: Yo lo hago así do while not rs. Eof 'hasta que no termine el recordset If rst!PERMISO= 1 Then Select Case rst!NOMBRE Case "PANEL" Me.cmdPanel.Enabled = True Case "ACTIVIDAD" Me.cmdActividad.Enabled = True Case "CAJA" Me.cmdCaja.Enabled = True Case...

Roberto Alvarado respondió: While not rst.eof if rst!permiso=1 then me.cmd & rst!nombre_filtro$.Enabled = true End if End while Aunque no estoy seguro que lo que esta en el if funcione pues en VB no existe la macrosustitución que es lo que estas intentando hacer en eso.

Roberto Alvarado respondió: Yo haría una sentencia como esta: "SELECT * FROM tblpersonal INNER JOIN tblpermisos ON tblpermisos.usuario1 = tblPersonal.id WHERE tblpersonal.usuario= "& ingusuario & " AND tblPermiso.Filtro = 'MENU' " En el select coloque * pero allí colocas los...