Организовать авторизацию в программе, использующей БД - VB
Формулировка задачи:
Народ..мне нужно в программе сделать админку...ну с доступом сам разберусь - это легко...
у меня в базе в таблице users хранятся логины и пароли некоторых юзеров. при в ходе в программу, открывается форма авторизации пользователя. и пользователь должен ввести свой логин в первое текстовое поле, а пароль во второе и нажать на кнопку войти. логин и пароль должен проверяться с базой. если логин одного человека верный, а пароль нет, то вывести соответствующее сообщение, что пароль не верный. если не правильно введено логин юзера, то выдать ошибку: "юзер не зарегистрирован".
то есть надо сделать как то привязку полей и проверку...
может кто нибудь на подобе что то писал..или в инете кто нашел, кинте пожалуйста. буду рад любой помощи или код кинте...плиз..помогите!!!
Решение задачи: «Организовать авторизацию в программе, использующей БД»
textual
Листинг программы
Private db As Database Private rs As Recordset Private Sub Form_Load() Set db = OpenDatabase(App.Path + "\1.mdb", False, False, ";pwd=" + MyPassword) ' MyPassword - пароль на 1.mdb End Sub Private Sub Command1_Click() Set rs = db.OpenRecordset("select * from users", dbOpenDynaset) rs.FindFirst "Name=""" + Text1.Text + """" If Text2.Text = rs.Fields("Password") Then MsgBox "Г…Г±ГІГј" Else MsgBox "ГЌГҐГІГі" End If rs.Close End Sub Private Sub Form_Unload(Cancel As Integer) db.Close End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д