Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
16.09.2008, 09:30
|
|||
|---|---|---|---|
|
|||
Не могу открыть БД с паролем через Data1 |
|||
|
#18+
У меня такая проблема я создал БД и задал пароль и теперь на VB не могу открыть ее вот код который сейчас: Private Sub Form_Load() Data1.DatabaseName = App.Path & "\Max.mdb" End Sub Подскажите что нужно добавить чтобы база открывалась. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.09.2008, 12:14
|
|||
|---|---|---|---|
Не могу открыть БД с паролем через 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 можно работать как обычно ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
17.09.2008, 08:03
|
|||
|---|---|---|---|
|
|||
Не могу открыть БД с паролем через Data1 |
|||
|
#18+
Какой запрос? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&mobile=1&tid=2161842]: |
0ms |
get settings: |
7ms |
get forum list: |
18ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
139ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
48ms |
get tp. blocked users: |
2ms |
| others: | 215ms |
| total: | 447ms |
| 0 / 0 |
