Доброго всем времени суток !!!
Может кто-нибудь подсказать
MSSQL 2000, Access 2000, adp
В VB пытаюсь реализовать следующий код на открытие формы:

Private Sub Form_Load()
Dim vDB As Database
Dim vQuery As QueryDef
Dim vStrSQL As String

Set vDB = CurrentDb
vStrSQL = "select * from my_table"
Set vQuery = vDB.CreateQueryDef("") ' <-- на этой строке дает ошибку
vQuery.SQL = vStrSQL
vQuery.Execute
End Sub

Ругается:

"Object variable or With block variable not set"

Не пойму в чем дело Может в VB не ту библиотеку подключил (Tools-References)
Но вроде все возможные варианты ADO и DAO пробовал подключать - результат тот же.