Можно ли из Access сделать "exec proc param1' на sql 2000? - VB

Формулировка задачи:

Как мне в аксесе выполнить хранимую процедуру на сервере ms sql 2000 и получить возвращаемый процедурой селект? если да то как? ps: доступ через ODBC

Решение задачи: «Можно ли из Access сделать "exec proc param1' на sql 2000?»

textual
                            Листинг программы 
                        

                            Sub Main()
 
Dim dbD3 As Database
Dim rStmt As Recordset
Dim sStatement As String
 
'Set dbD3 = ConnectD3Source('aa');
Set dbD3 = Workspaces(0).OpenDatabase(mbsII, False, False, 'ODBC;DATABASE=qu;DSN=qu')
 
sStatement = 'select item from ITEM'
 
Set rStmt = dbD3.OpenRecordset(sStatement, dbOpenDynaset, dbSQLPassThrough)
 
Do While Not (rStmt.EOF) ' Цикл, пока есть данные
  For I = 0 To rStmt.Fields.Count - 1
  ' Вывести имя и значение каждого столбца
  Debug.Print rStmt.Fields(I).Name & ' ' & rStmt.Fields(I).Value
  Next I
  Debug.Print
  rStmt.MoveNext ' Получить следующую строку
Loop
rStmt.Close ' Закрыть набор записей
End Sub
                        