powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADO
13 сообщений из 13, страница 1 из 1
ADO
    #32170368
DЭN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Помогите пожалуйста

Как подконектится к запароленной базе Accsses через элемент управления Adodc1. Я подключаюсь из окна свойств. свойство "CUSTOM"

может кто подскажет как подконектиться путем программного кода.
...
Рейтинг: 0 / 0
ADO
    #32171577
Vitaly Vengrov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Используй такую строку подключения :

Код: plaintext
1.
2.
3.
4.
5.
strConn =  "User ID=<login>; Password=<password>;"  & _
     "Data Source = <путь к базе>;"  & _
     "Provider=Microsoft.Jet.OLEDB.3 . 51 ;" & _
     "Jet OLEDB:System database=<путь к system.mdw>"  & _
     "\system.mdw;" 


В местах где кавычки подставь свои данные
...
Рейтинг: 0 / 0
ADO
    #32172690
DЭN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я пытаюсь это сделать вот так..... но все равно не получается... выдает сообщение "ОШИБОЧНЫЙ ПАРОЛЬ".... что я не так делаю..

With Adodc1
.ConnectionString = "User ID=sa; Password=21;" & _
"Data Source = d:\proba_ADO\base.mdb;" & _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Jet OLEDB:System database=d:\proba_ADO\" & _
"\base.mdw;"
.RecordSource = "SELECT * FROM tab WHERE name"
End With
...
Рейтинг: 0 / 0
ADO
    #32172760
Vitaly Vengrov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что это за base.mdw ? Где ты его взял ?
В нем должны храниться идентификаторы груп, пользователей, паролей и т.п.
Поищи у себя где твой Access держит его, скопируй себе в папку, и в строке подключения укажи к нему путь.
...
Рейтинг: 0 / 0
ADO
    #32172849
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не путайте божий дар с яичнейцей :)
Password - Это пароль для учетной записи
DЭN'у же нужен пароль для базы

используй в строке конекта "Jet OLEDB:Database Password=Пароль"
...
Рейтинг: 0 / 0
ADO
    #32172850
Leshi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если это тестовая база, и была просто создана в аксессе, то попробуй поле пароль оставить пустым.
...
Рейтинг: 0 / 0
ADO
    #32172896
DЭN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Елы палы ... незнал я про этот системный файлик system.mdw..
ну скопировал я его в ту папку... указал путь, но снова ошибка но уже с другим сообщением НЕДОПУСТИМОЕ ИМЯ УЧЕТНОЙ ЗАПИСИ ИЛИ ПАРОЛЬ.

в чем дело опять...

через DAO у меня получается а ADO прется ... млин
в DAO я использую так.
basa = OpenDatabase("test.mdb", True, False, ";pwd=21" & Form4.Text1.Text& "")

With Adodc1
.ConnectionString = "User ID=; Password=21;" & _
"Data Source = d:\proba_ADO\base.mdb;" & _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Jet OLEDB:System database=d:\proba_ADO\" & _
"\system.mdw;"
.RecordSource = "SELECT * FROM tab WHERE name"
End With

Мне просто это очень нужно... пишу прогу тестирования для коледжа..
Помогите...
...
Рейтинг: 0 / 0
ADO
    #32172915
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2DЭN

То ты про одно говришь (про пароль к базе) то про другое (про пароль к учетной записи)
Ты бы выражался конкретнее.
Намутил со строкой подключения, а теперь ебе%ься


Код: plaintext
1.
2.
3.
4.
5.
PROVIDER=Microsoft.Jet.OLEDB. 4 . 0 ;
User ID=Admin;
DATA SOURCE=C:\...*.mdb;
Jet OLEDB:System database=C:\PROGRA~ 1 \COMMON~ 1 \System\SYSTEM.MDW;
Jet OLEDB:Database Password=Пароль"
...
Рейтинг: 0 / 0
ADO
    #32172960
Vitaly Vengrov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
да он просто User ID оставил пустым,
а должно по идее "User ID=sa;"

а вот этот кусок кода з ДАО у тебя вообще нерабочий так как тут куча ошибок
Код: plaintext
1.
basa = OpenDatabase( "test.mdb" , True, False,  ";pwd=21 " & Form4.Text1.Text& "") 
...
Рейтинг: 0 / 0
ADO
    #32172966
DЭN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
User ID = sa и так не прет
...
Рейтинг: 0 / 0
ADO
    #32172974
Vitaly Vengrov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ты расскажи как ты паролил эту базу ?
и дай реальный кусок с ДАО, а не этот
...
Рейтинг: 0 / 0
ADO
    #32172989
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пост от 14:38 не прокатил?
Странно...
...
Рейтинг: 0 / 0
ADO
    #32173111
Lilik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Если это поможет то я так подключаюсь к аксэсу и к ADODC:

sConnetcString = "" & _
"Driver={Microsoft Access Driver (*.mdb)}; " & _
"DefaultDir=" & App.Path & "\" & "; " & _
"Dbq=cont.mdb; " & _
"Uid=" & sUN & "; " & _
"Pwd=" & sPW & ";"

cn.Open sConnetcString

sSQL1 = "SELECT * FROM Lei"

With AdodcReflect1
.ConnectionString = sConnetcString
.RecordSource = sSQL1
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.EOFAction = adDoMoveLast
.LockType = adLockOptimistic
.CommandType = adCmdText
.Refresh
End With
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADO
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]