GLB_con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & GLB_Patch_Connection

как проверить - подключение прошло успешно или нет

вычетал такой вариант

For Each ADOErr In GLB_con.Errors
FUN_IN_LOG (ADOErr.Description)
Next

на жирное ругается - переменная не определена

Ну так и в чем проблемы - там же тебе нормальным японским языком написано, что нужно делать ( наверное )

Оказалось просто я туп тупарём.....
просто надо вначале резервануть или как там

Dim ADOErr As ADODB.Error

А потом пожалуйста

For Each ADOErr In GLB_con.Errors FUN_IN_LOG (ADOErr.Description) Next

эт точно!!!