[Diz]

Необходимо реализовать связь MapInfo и бд в Access. На карте выделен объект и в базе данных, при нажатии на кнопку должен осуществляться поиск выбранного объекта. Пишу следующий код, но подсвечивается строка MyVar = FServer.Eval(FServer, "Selection.ID"), в чем ошибка, не могу понять
Private Sub Кнопка165_Click()
Dim FServer As Object
Dim MyVar As String
Set FServer = CreateObject("MapInfo.Application")
FServer.Visible = True
MyVar = FServer.Eval(FServer, "Selection.ID")
pp = "Id_OOPT=" & """" & MyVar & """"
DoCmd.OpenForm "frmOOPT", , , pp
Set FServer = Nothing
End Sub

[Alex_Y]

зачем такие сложности с аксессом? просто откройте таблицу аксесса в МИ и работайте с ней

[Diz]

[Arhara]

Так заработало или нет?
Не очень понятно откуда куда выдается команда. Из MI к Access или наоборот. То коду - запрос на объекты выдается из Access, по описанию задачи - получается, что наоборот, надо устанавливать связь MI и сервер-Access

[Diz]

Access является клиентом и обращается к MapInfo. Все работает, Я когда связь устанавливала, два раза прописала канал связи, поэтому и не работало. А сейчас на одной машине запускается, а на другой нет((( Но это проблема уже не в коде, это что-то с VBA, пока еще не разобралась. Может библиотека нужная не подключена

[Arhara]

[KarpovSergei]

To Johny: Да, имеется в виду что через ODBC, если без проблем подскажите как. Делаю в Access: Внешние данные-Связь с таблицами-ODBC-Oracle.dsn-указываю таблицу-и система выдает ошибку-таблицы нет.

[Alex_Y]

В настройках ODBC создаете свой пользовательский источник данных, который ссылается на вашу БД аксесса. В МИ выбираете ее а не оракл.