Надо получить от SQL 2000 табличку, которая зависит от дата1 и дата2. По совету местных гуру забабахал функцию. В SQL QA все работает здорово. Одна проблема. Не могу передать табличку в акцесс. Процедурки я вызываю через запрос к серверу. А вот как дернуть табличку из функции как то не соображу.
Пробовал через EXEC все здорово срабатывает и...
Пробовал SET DimRecordset=DimQuery.OpenRecordset - ругается
Пробовал SET DimRecordset=DimQuery.Exec - ругается
Чего дальше попробовать, кто подскажет?

Re: Владимиру Санычу.
Завел на сервере функцию В2() которая в QA: select * from b2()
возвращает табличку 1х12 (1 столбец 12 строк)

На Акцессе есть запрос к серверу, строки возвращает QueryForSQL2000
и описаны переменные
Dim Q As QueryDef
Dim S As Recordset

теперь коллекция сообщений от Акцесса97:
1. "Ожидалась процедура или функция"
на:
Public Function temp() ' дальше то переменные описаны так же
Dim Q As QueryDef
Dim S As Recordset
Set Q = CurrentDb.QueryDefs![QueryForSQL2000]
Q.SQL = "B2"
Set S = Q.Execute ' Execute выделено синим

2. Ошибка компиляции. Ожидалась процедура Functin илипеременная
на :

Set Q = CurrentDb.QueryDefs![QueryForSQL2000]
Q.SQL = "SELECT * FROM B2"
Set S = Q.Execute ' Execute выделено синим

3. Ошибка выполнения "3146" ODBC - ошибка вызова
на:
Set Q = CurrentDb.QueryDefs![QueryForSQL2000]
Q.SQL = "SELECT * FROM B2"
Set S = Q.OpenRecordset ' спотыкается на этой строке

4. Ошибка выполнения "3146" ODBC - ошибка вызова
на:
Set Q = CurrentDb.QueryDefs![QueryForSQL2000]
Q.SQL = "B2"
Set S = Q.OpenRecordset ' спотыкается на этой строке

Сейчас эксперементирую с объектом типа Connection тоже пока без особых успехов. У меня конечно еще много хороших идей, но лучше если кто подскажет как сделать :)