Ayuda con un select sql server asp

[Shiryu_Libra]

lo has intentado sin el recordset, ya que estas realizando un execute, en lugar de un open

<%
set objBase=server.CreateObject("ADODB.Connection")

objbase.Open "PROVIDER=SQLOLEDB;DATA SOURCE=192.1.2.2;UID=SA;PWD=CLAVE;DATABASE=MIBASE DE DATOS"

sentencia="SELECT COUNT(numpreg_encu),geren_encu from datos_encu where numpreg_encu='1' GROUP BY geren_encu"

set objtabla=objbase.Execute(sentencia)

for i=0 to ubound(objtabla,1)
response.write objtabla(i)
next

objbase.close%>

... algo esta mal