|
|
|
Не могу открыть БД с паролем через Data1
|
|||
|---|---|---|---|
|
#18+
У меня такая проблема я создал БД и задал пароль и теперь на VB не могу открыть ее вот код который сейчас: Private Sub Form_Load() Data1.DatabaseName = App.Path & "\Max.mdb" End Sub Подскажите что нужно добавить чтобы база открывалась. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.09.2008, 09:30 |
|
||
|
Не могу открыть БД с паролем через Data1
|
|||
|---|---|---|---|
|
#18+
Добавляем ссылку на DAO 3.6 в референсах Private Sub Form_Load() Const DB_PWD = "12345"'пароль к БД Dim DB as DAO.Database'Объект База данных Dim RS As DAO.Recordset'набор данных Set DB = OpenDatabase("C:\База.mdb", 0, 0, ";pwd=" & DB_PWD)'открываем БД Set RS = DB.OpenRecordset("здесь запрос")'создаем набор записей Set Data1.Recordset = RS'присваеваем набору Data1 End Sub А далее с Data1 можно работать как обычно ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.09.2008, 12:14 |
|
||
|
Не могу открыть БД с паролем через Data1
|
|||
|---|---|---|---|
|
#18+
Какой запрос? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2008, 08:03 |
|
||
|
|
start [/forum/moderation_log.php?user_name=%D0%B3%D0%B5%D1%81%D1%82%D1%8B]: |
0ms |
get settings: |
10ms |
get forum list: |
13ms |
get settings: |
9ms |
get forum list: |
17ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
67ms |
get topic data: |
12ms |
get first new msg: |
6ms |
get forum data: |
3ms |
get page messages: |
55ms |
get tp. blocked users: |
2ms |
| others: | 681ms |
| total: | 881ms |
| 0 / 0 |
