Ошибка! ActiveX component can't create object!

[Insainer]

Помогите кто знает, такая проблема: У меня база в Access 2003, хочу создать модуль, например такой простой код:
Sub Данные_набора_записей()
Dim conn As connection
Dim rs As Recordset
Dim Строка_SELECT As String
Set conn = CurrentProject.connection
Set rs = CreateObject("ADOBD.Recordset")
Строка_SELECT = "SELECT * FROM Складские_операции"
rs.OpenRecordset Строка_SELECT, "Влад-эко"
MsgBox rs("Номер_операции") & ", " & rs("Номер_заказа")
rs.Close
Set rs = Nothing
End Sub
Компиляция проходит нормально, при запуске вылетает ошибка: Run-time error '429': ActiveX component can't create object! В строке Set rs = CreateObject("ADOBD.Recordset") ошибка...
Перепробовал очень много всего, ничего не помомогает.
Уровень безопасности низкий, запуск макросов разрешен, источник данных в ODBC создал, регестрировал DAO библиотеку вручную: RegSvr32 "C:\Program Files\Common Files\Microsoft Shared\DAO\dao360.dll", в ссылках(References) все необходимые библиотеки отмечены: ADO 2.8, DAO 3.6, и др., установил Visual Basic 6.0, пробовал переставлять сам Access, проверял в Access 2007, все та же ошибка, ActiveX не может создать объект. Вообще, объект Recordset работает через окно активонй формы (программы формы) что-то типа Me.Recordset.GetRows(20), но мне нужен именно рабочий модуть с соединением (connection). Единственная зацепка, из-за чего все это: разные версии файлов автоматизации (у меня): Asycfilt.dll, Oleaut32.dll, Olepro32.dll, Stdole2.tlb, однако после установки Visual Basic 6.0, версии хоть и обновились, но попрежнему разные... Может не в этом дело? Кто сталкивался с такой проблемой и знает как её решить, помогите! Хотя бы советом или рекомендацией...