Prueba asi cambiando los datos por los que corresponda:
Código asp:
Ver original<%
Dim MM_Conn_STRING
MM_conn_STRING = "Driver={SQL Server};Server=SERVIDOR_SQL;Database=NOMBRE_BD;Uid=user; pwd=mipass"
Set Rs = Server.CreateObject("ADODB.Recordset")
Call_Sql = "SELECT * FROM Tabla "
Rs.Open Call_Sql, MM_conn_STRING, 1, 3
Rs_total = Rs.RecordCount
Rs.close
Set Rs = Nothing
%>