| Вопрос: Поиск в БД при помощи AdoDc | Добавлено: 20.02.07 11:21 |
Автор вопроса:  master_x | Web-сайт: . | ICQ: . |
|
Здарова всем блин. Такая блин проблема возникла блин. У меня короче база под паролем блин, делаю поиск мне блин говорят инвалид пассворд и все такое. Кода оч. много поэтому приведу некоторые ключевые блин моменты.
Установка пароля Set NewDB = NewWs.OpenDatabase(App.Path & "\Data\PPS.mdb", True) NewDB.NewPassword "","Pass" Поиск Dim WS As Workspace Dim DB As Database Set WS = DBEngine.Workspaces(0) Set DB = WS.OpenDatabase(App.Path & "\Data\Pps.mdb", False, False) Set RS = DB.OpenRecordset("PPS", dbOpenDynaset) frmFind.txtFind.Text = RS("LichDan_0") If frmFind.txtFind.Visible = True Then RS.Find (frmFind.txtFind.Text) Кстати я тут юзал не контрол а библиотеку MS ActiveX Data Object 2.5. |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #1 | Добавлено: 21.02.07 17:42 |
| блин переблин шо-то блин не видно блин где у тебя в поиске при открытии БД блин пароль указан который ты ж блин устанавливаешь выше... | ||
|
Номер ответа: 2 Автор ответа: master_x ICQ: . Вопросов: 1 Ответов: 1 |
Web-сайт: Профиль | | #2 | Добавлено: 27.02.07 11:20 |
| это все дело понятное но ты мне блин конкретно код приведи потому как я не наю как в функции поиска прописать пароль | ||
Страница: 1 |