Отрывок из кода:


Set Rs.ActiveConnection = Cn
Rs.LockType = adLockReadOnly
Rs.Source = "select coalesce(mailbox, street) as St," & _
"coalesce(pbzip, zip) as PLZ, addressterm, title, name, christianname," & _
"addressletter , compname, town" & _
"from (" & _
"select addressterm, title, name, christianname, addressletter," & _
"compname, town, street, zip, pbzip, pbox," & _
"replace(replace(pbox, 'Mailbox', ''), ' ', '') as mailbox" & _
"from address where cast(GGUID as uniqueidentifier)" & _
"like '" & UserForm1.CoBxASP.Value & "'" & _
") as temptab"

Rs.Open здесь выдает ошибку при debugging
Rs.MoveFirst

в БД запрос работает идеально без каких-либо проблем, что здесь не так и что можно сделать - ума не приложу, ВБ я не особо знаю..