Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Работа с данными

Страница: 1 |

 

  Вопрос: Пароль на mdb Добавлено: 01.08.03 09:43  

Автор вопроса:  RAD

Пишу:
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase(App.Path & "\Dbase\ИМЯ_БД.mdb")
Set rs = db.OpenRecordset("ИМЯ ТАБЛИЦЫ", dbOpenTable)
Подскажите, какой надо код, чтобы открыть БД, защищенную паролем.
Спасибо.

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Legik



ICQ: 292375033 

Вопросов: 3
Ответов: 72
  Профиль | | #1 Добавлено: 01.08.03 10:01

Попробуй так:

Set db = ws.OpenDatabase(App.Path & "\Dbase\ИМЯ_БД.mdb",,,"pwd = ТвойПароль")

Ответить

Номер ответа: 2
Автор ответа:
 RAD



Вопросов: 32
Ответов: 8
  Профиль | | #2 Добавлено: 01.08.03 11:59

Так не получилось, а вот так сработало !!!
Set db = ws.OpenDatabase(App.Path & "\Dbase\ИМЯ_БД.mdb", False, False, "MS Access;PWD=ПАРОЛЬ")

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам