Вопрос: подключение к Access базе с паролем...

Добавлено: 31.10.10 23:23

Автор вопроса:  VbStarter | Web-сайт: moscowdevils.ru | ICQ: 357911808

VB6 конечно возник вопрос - Private Sub Form_Load() On Error GoTo errHandler App.TaskVisible = True Timer1_Timer     With MDB         .CursorLocation = adUseClient         .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & frmUserDataWay.UserWay         .Open     End With     Set DataGrid1.DataSource = TBL     Set DataGrid2.DataSource = TBL2     TBL.Open "select * from Finances", MDB, adOpenStatic, adLockOptimistic     TBL2.Open "select * from FinancesReserved", MDB, adOpenStatic, adLockOptimistic     DataGrid1.ReBind     DataGrid2.ReBind      errHandler: If Not Err.Description = "" Then MsgBox "Îøèáêà ïîäêëþ÷åíèÿ ê áàçå äàííûõ MS Access! Äëÿ ñëóæáû ïîääåðæêè: " & Err.Description, vbCritical, "Îøèáêà! - Îáðàáîò÷èê Îøèáîê Êëèåíòà 1,0" MsgBox "Ïðîâåðüòå ÷òî áàçà äàííûõ íå ïîâðåæäåíà, à èìåíà òàáëèö íå áûëè èçìåíåíû áåç ïðåäâàðèòåëüíîé íàñòðîéêè ïðîãðàììû àäìèíèñòðàòîðîì. Ïðè íåîáõîäèìîñòè - íàñòðîéòå ïðîãðàììó, èëè îáðàòèòåñü ê ðàçðàáîò÷èêó (ñëóæáå ïîääåðæêè), óêàçàâ äàííûå èç ÎÎÊ (Îáðàáîò÷èêà Îøòáîê Êëèåíòà) è åãî âåðñèþ, à òàê æå âåðñèþ êëèåíòà (SDBC).", vbInformation, "Êðàòêàÿ ñïðàâêà 1,1" End If End Sub как передать пороль к мдб'шнику (в ерроре выдаёт ошибочный пароль) Ответить

Ответы

Всего ответов: 3

Номер ответа: 1 Автор ответа:  VbStarter ICQ: 357911808  Вопросов: 118 Ответов: 1340	Web-сайт: moscowdevils.ru  Профиль | | #1	Добавлено: 31.10.10 23:26
	и ещё - забыл в чём различия adOpenStatic, и прочих вариантов (Dinamic, tape, ...) Ответить

Номер ответа: 2 Автор ответа:  EROS Вопросов: 58 Ответов: 4255	Профиль | | #2	Добавлено: 31.10.10 23:28
	http://connectionstrings.com/access Ответить

Номер ответа: 3 Автор ответа:  VbStarter ICQ: 357911808  Вопросов: 118 Ответов: 1340	Web-сайт: moscowdevils.ru  Профиль | | #3	Добавлено: 01.11.10 13:33
	спс Ответить

Страница: 1 |