vb6 набор записей sql запрос

Question

Как использовать запрос на добавление в vb6 с паролем доступа db? Следующее дает ошибку. dim s as string s = "вставить в файлprofile пациента (crno), выберите файл PatientRofile.crno из папки" d: \ liverrecord.mdb "и" Jet OLEDB: Пароль базы данных = печень ""

Answer 1

Не совсем понятно, чего вы хотите. Тем не менее,

Сначала вы должны обратиться к библиотеке объектов Microsoft DAO 3.6. Затем вы можете открыть базу данных следующими двумя строками.

Dim Engine As DAO.DBEngine: Set Engine = New DAO.DBEngine
Dim DB As DAO.Database: Set DB = _
       Engine.Workspaces(0).OpenDatabase("D:\LiveRecord.mdb", false, false, _
       "MS Access;PWD=liver")

Вы можете получить доступ к выражению sql с помощью

Call DB.Execute("insert etc")

Надеюсь, это поможет.

Гийом Ханик