
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
06.08.2003, 13:13
|
|||
|---|---|---|---|
|
|||
Ошибка ODBC-call failed |
|||
|
#18+
Прилинковал в MS Access 2000 таблицу MS SQL server 7.0. При просмотре этой таблицы - Ошибка ODBC-call failed. Так как это проблема не новая, почитал имеющиея ответы. Возник вопрос: Как прилинковать таблицу с помощью не DAO, а ADO, без програмного кода? Или обычным путём это не возможно. Спасибо за ответы. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
06.08.2003, 17:07
|
|||
|---|---|---|---|
|
|||
Ошибка ODBC-call failed |
|||
|
#18+
Гуру не могут или не хотят ответить? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
06.08.2003, 17:11
|
|||
|---|---|---|---|
Ошибка ODBC-call failed |
|||
|
#18+
а что такое обычный путь в данном контексте? с каких пор можно прилинковать таблицу с помощью ADO? вот поэтому и не отвечают ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
06.08.2003, 17:29
|
|||
|---|---|---|---|
|
|||
Ошибка ODBC-call failed |
|||
|
#18+
Согласен. Подскажи как програмым путём можно подключиться? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
06.08.2003, 17:38
|
|||
|---|---|---|---|
Ошибка 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, 18:10
|
|||
|---|---|---|---|
|
|||
Ошибка ODBC-call failed |
|||
|
#18+
А вот это: MsgBox "??????? ? ????? ?????? ??? ??????????! " - это на иврите? :^) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=45&tablet=1&tid=1680072]: |
0ms |
get settings: |
4ms |
get forum list: |
8ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
43ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
26ms |
get tp. blocked users: |
1ms |
| others: | 180ms |
| total: | 274ms |

| 0 / 0 |
