|
|
|
Ошибка ODBC-call failed
|
|||
|---|---|---|---|
|
#18+
Прилинковал в MS Access 2000 таблицу MS SQL server 7.0. При просмотре этой таблицы - Ошибка ODBC-call failed. Так как это проблема не новая, почитал имеющиея ответы. Возник вопрос: Как прилинковать таблицу с помощью не DAO, а ADO, без програмного кода? Или обычным путём это не возможно. Спасибо за ответы. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2003, 13:13 |
|
||
|
Ошибка ODBC-call failed
|
|||
|---|---|---|---|
|
#18+
Гуру не могут или не хотят ответить? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2003, 17:07 |
|
||
|
Ошибка ODBC-call failed
|
|||
|---|---|---|---|
|
#18+
а что такое обычный путь в данном контексте? с каких пор можно прилинковать таблицу с помощью ADO? вот поэтому и не отвечают ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2003, 17:11 |
|
||
|
Ошибка ODBC-call failed
|
|||
|---|---|---|---|
|
#18+
Согласен. Подскажи как програмым путём можно подключиться? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2003, 17:29 |
|
||
|
Ошибка ODBC-call failed
|
|||
|---|---|---|---|
|
#18+
а что сделать то надо? если ты хочешо прилинковать таблицы програмно- это через DAO делать надо если ты хочешь рекордсет открыть, то это можно сделать и через DAO и ADO вот пример, автора не помню, кажется у Андрея Митина на форуме было Function LinkingTables(DataBasePath As String) On Error GoTo Err_Link Dim DBLink As DAO.Database Dim DB As DAO.Database Dim tblTableToLink As TableDef Dim tblTable As TableDef DoCmd.Hourglass True Set DBLink = DBEngine(0).OpenDatabase(DataBasePath) Set DB = CurrentDb For Each tblTableToLink In DBLink.TableDefs If tblTableToLink.Attributes = 0 Then Set tblTable = DB.CreateTableDef(tblTableToLink.Name) tblTable.Connect = ";DATABASE=" & DataBasePath & ";Table=" & tblTableToLink.Name & "" tblTable.SourceTableName = tblTableToLink.Name DB.TableDefs.Append tblTable DB.TableDefs.Refresh Set tblTable = Nothing End If Next tblTableToLink DBLink.CLOSE DoCmd.Hourglass False Exit Function Err_Link: Select Case err.Number Case 3012 MsgBox "??????? ? ????? ?????? ??? ??????????! " & tblTableToLink.Name, vbCritical + vbOKOnly Case 3024 MsgBox "?? ???? ????? ???? ? ???????? ??????!", vbCritical + vbOKOnly Case 3044 MsgBox "äðúéá ìáñéñ ðúåðéí ìà ðëåï!", vbCritical + vbOKOnly Case Else MsgBox err.Number MsgBox err.Description End Select DoCmd.Hourglass False End Function DataBasePath - это путь к базе с таблицами ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2003, 17:38 |
|
||
|
Ошибка ODBC-call failed
|
|||
|---|---|---|---|
|
#18+
А вот это: MsgBox "??????? ? ????? ?????? ??? ??????????! " - это на иврите? :^) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2003, 18:10 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32229185&tid=1680072]: |
0ms |
get settings: |
5ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
16ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
27ms |
get tp. blocked users: |
1ms |
| others: | 192ms |
| total: | 262ms |

| 0 / 0 |
