Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Связка VB-ACCESS / 8 сообщений из 8, страница 1 из 1
03.11.2003, 12:03
    #32313310
AloneWarlock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
Имеется база защищенная на уровне пользователей.Хочу к ней подсоедениться
посредвством ADODB, подскажите как это сделать?
...
Рейтинг: 0 / 0
03.11.2003, 13:00
    #32313405
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
вот\r
...
Рейтинг: 0 / 0
03.11.2003, 14:00
    #32313490
AloneWarlock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
Много текста - а где конкретика?
...
Рейтинг: 0 / 0
03.11.2003, 14:26
    #32313548
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
2AloneWarlock

вот еще

в одном из топиков точно есть ответ на твой вопрос.
Удачи!
...
Рейтинг: 0 / 0
03.11.2003, 15:05
    #32313608
AloneWarlock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
Имею такой код - что не так???
Dim wrkJet As Workspace
Dim dbsNorthwind As Database
Dim dbsPubs As Database
Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet)
Set dbsNorthwind = wrkJet.OpenDatabase("", dbDriverNoPrompt, True, "odbc;Driver=Microsoft Access Driver (*.mdb);Dbq=c:\111\sdd.mdb;SystemDB=\\server2\sopr1\secured.mdw;VIL; 123456;")
...
Рейтинг: 0 / 0
03.11.2003, 15:36
    #32313659
viper
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
Я делал так (правда не ODBS а JET):

Public cnn As New ADODB.Connection
Public datHansa As ADODB.Recordset

cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn.Properties("Jet OLEDB:System database") = App.path & "\SYSTEM.MDW"

cnn.Open "Data Source=" & App.path & "\PMK.mdb;User Id=Administrator;Password=admin;"

Set datHansa = New ADODB.Recordset
datHansa.Open "SELECT * FROM HansaExport", cnn, 2, 2
...
и погнали....
...
Рейтинг: 0 / 0
03.11.2003, 18:01
    #32313999
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
4AloneWarlock
Код: plaintext
1.
2.
3.
4.
5.
Dim wrkJet As Workspace 
Dim dbsNorthwind As Database 
Dim dbsPubs As Database 
Set wrkJet = CreateWorkspace( "", " admin ", "  ", dbUseJet) 
Set dbsNorthwind = wrkJet.OpenDatabase("  ", dbDriverNoPrompt, True, " odbc;Driver=Microsoft Access Driver (*.mdb);Dbq=c:\ 111 \sdd.mdb;SystemDB=\\server2\sopr1\secured.mdw;VIL;  123456 ;")

это не ADODB ,а DAO !!!!!

...
Рейтинг: 0 / 0
04.11.2003, 06:45
    #32314269
AloneWarlock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связка VB-ACCESS
4All
Всем тенькс, вроде поехало....
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Связка VB-ACCESS / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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