| Вопрос: открытие Access 2000 с паролем | Добавлено: 15.02.07 19:13 |
Автор вопроса:  ua4ase
|
| Подскажите как подключить к Data базу данных, созданной в Access 2000 и запаролированной (пароль известен). |
| Ответы | Всего ответов: 8 |
|
Номер ответа: 1 Автор ответа:  art Вопросов: 45 Ответов: 119 |
Профиль | | #1 | Добавлено: 15.02.07 22:08 |
|
Вот код для открытия БД через DAO:
dbname = имя БД password = ;pwd=пароль БД Set db = Dao.OpenDatabase(dbname, False, False, password) Через Ado есть много примеров - поищи. |
||
|
Номер ответа: 2 Автор ответа: artВопросов: 45 Ответов: 119 |
Профиль | | #2 | Добавлено: 15.02.07 22:10 |
| упс, не увидел: Data, cчитай топик 1 не по теме. | ||
|
Номер ответа: 3 Автор ответа: 20vek Вопросов: 10 Ответов: 71 |
Профиль | | #3 | Добавлено: 15.02.07 22:16 |
|
Я не знаю в чем глубинная разница, но в 98 делалось так...
Public Function OpenDB() As Boolean
'************************************************************************************* ' Open database file '************************************************************************************* On Error GoTo err_hndl Dim strFileName As String 'get database name. If File doesn't exist then build it strFileName = AddDirSep(App.Path) & "  B1.mdb"
If Not FileExist(strFileName) Then CreateFile strFileName End If 'Open the database Set DB = OpenDatabase(strFileName, False, False, ";pwd=пароль" 
OpenDB = True Exit Function err_hndl: ShowErrorMessage "mdlFuncs: " & "xGetValue", Err.Number, Err.Description OpenDB = False End Function |
||
|
Номер ответа: 4 Автор ответа: artВопросов: 45 Ответов: 119 |
Профиль | | #4 | Добавлено: 16.02.07 10:03 |
| Вот здесь глянь: http://www.azbukavb.narod.ru/dbcod/prim3.html | ||
|
Номер ответа: 5 Автор ответа: ua4aseВопросов: 5 Ответов: 19 |
Профиль | | #5 | Добавлено: 16.02.07 21:54 |
|
Data1.DatabaseName = App.Path & "\Biblio.mdb"
Data1.Connect = "MS Access;pwd=123 Да, я так делал, когда была подключена к программе база, созданная в Access 97 и все работало. Но загвоздка в том, что если в системе установлена программа Visio, то моя прога отказывалась работать вообще. А когда подключаю базу Access 2000, то все работает нормально, но запаролированная не хочет открываться. Хотя какая связь между VB6 и Visio - непонятно. Проблема конфликтов между этими прогами была найдена методом научного тыка 
|
||
|
Номер ответа: 6 Автор ответа: EROS Вопросов: 58 Ответов: 4255  |
Профиль | | #6 | Добавлено: 16.02.07 23:31 |
| Конфликт состоит в том, что Visio при инсталляции устанавливает другую (более ранюю) версию MDAC. А для того, чтобы у тебя элемент Data понимал формат Access 2000 тебе необходимо установить, как минимум, SP5 а лучше SP6. Его можно скачать с сайта MS. | ||
|
Номер ответа: 7 Автор ответа: ua4aseВопросов: 5 Ответов: 19 |
Профиль | | #7 | Добавлено: 19.02.07 19:25 |
| sp5 стоит, но толку нет | ||
|
Номер ответа: 8 Автор ответа: EROSВопросов: 58 Ответов: 4255 |
Профиль | | #8 | Добавлено: 19.02.07 22:35 |
| Если Visio ставил после него, то он подменил файлы.. надо переустанавливать SP, если нет, то не знаю.. (( | ||
Страница: 1 |