Visual Basic - DONDE ESTA EL ERROR?

ESTOY INTENTANDO HACER UNA CONEXIONA UNA BASE SQL SERVER 6.5 PERO ME DICE QUE EL Recodset no esta definido

Y ESTE ES EL CODIGO,

Private Sub Form_Load()

Dim rs As Recordset
DB_CONNSTRING = "Provider=SQLOLEDB;Data Source=15.20.14.91;" _
& "Initial Catalog=pubs;User Id=X;Password=X;" _
& "Connect Timeout=15;Network Library=dbmssocn;"

Set rs = New Recordset
rsCount.Open "contador", DB_CONNSTRING, adOpenStatic, adLockReadOnly
Dim X
X = rsCount.RecordCount
Print X
End Sub

en fecto si hacer un dim rs as en la ventanita no aparece el "mentado Recordset".

Espero que alguien me pueda hechar una mano. que no se supone que deberia ser igual a asp.
saludos.

En el código no veo un error... pero posiblemente te falto poner la libreria de DAO en la referencias...
Busca esa libreria en Referencias y agregas AD0 5.x o 6...

creo k ese es el error...

Tienes que hacer referencias a la siguiente libreria
Entra al menu Proyectos/Referencias de ahi selecciona la siguiente opcion Microsoft ActiveX Data Objects 2.6 Library
con esto solucionas tu problema

Saludos desde Lima Peru