informacion de usuarios

[aldo1982]

es un poco de lógica no? bue ejemplo

en la tabla usuarios compuesta por:
nusu,passw,ingresodatos,consultadatos


do while not rs.EOF
if txtusu = rs!usu and txtpassw = rs!passw then

msgbox "el usuario: " txtusu & "se loguó con exito"
'para ke el usuario si tiene el permiso peuda ver el boton del form2 de ingreso de datos Select rs!ingresodatos
case = "S"
form2.botoningreso.enable = true
case = "N"
form2.botoningreso.enable = false
end select

'para ke el usuario pueda ver o no ver el boton del form2 el botonconsulta

Select rs!consultadatos case = "S"
form2.botonconsulta.enable = true
case = "N"
form2.botonconsulta.enable = false
end select

'Si el usuario coincide con la contraseña se carga el 2do formulario
form2.show


else
msgbox "Error en datos de usuarios",0,"error"

end if
loop
endsub
'bue este codigo lo armé recien, le faltan muchas cosas, pero lo hice como para ke te guiés, hace la coneccion a tu base de datos y lo demás.
salu2