как проверить login name и login password, из login.frm если данные есть в access-е.
как соединить форму с БД без ADOC DATA control-а
Заранее благодарен
'Соединяемся с БД без контролов
Sub db_connect()
strTable="Имя таблицы"
conString = "DSN=База данных MS Access;DBQ=db.mdb;DriverId=25;"
cn.Open conString
'Вместо следующего запроса
'надо написать запрос по извлечению пароля и логина из
'соответствующей таблицы
strQuerry = "Select * FROM " & strTable
rs.Source = strQuerry
Set rs.ActiveConnection = cn
rs.Open
End Sub
Сейчас этот форум просматривают: SemrushBot и гости: 163