Добрый день. подскажите из-за чего выходит ошибка.
Выделяется строка rs2.Open
object variable or with block variable not set

Dim rs2 As Object
Dim objConnectionSer As Object

Set objConnectionSer = New ADODB.Connection

objConnectionSer.Open "Provider=SQLOLEDB.1;Password=SID;Persist Security Info=True;User ID=SID;Initial Catalog=tst;Data Source=r06"

rs2.Open "dbo.Dogovors", objConnectionSer, 3, 3

http://www.sql.ru/forum/1208503/podkluchenie