Saludos a todos, ya logre resolver el problema y lo que hice es utilizar un RecordSet para hacerlo.
' declaro los objetos a utilizar
Dim objConn, RS, adOpenKeySet, adLockOptimistic As Object
Dim strSQL As String
adOpenKeySet = 1
adLockOptimistic = 3
' creo la coneccion al servidor SQL Server
objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=SQLOLEDB; DATA SOURCE=localhost" & _
"Integrated Security=SSPI; Initial Catalog=MiBase"
objConn.Open()
' creo y asigno propiedades al RS para que pueda desplazarse en los registros
RS = Server.CreateObject("ADODB.Recordset")
RS.CursorType = adOpenKeySet
RS.LockType = adLockOptimistic
' se habre la coneccion y se le asigna lo que esta en la consulta al RS
strSQL = "select * from tablavar where id = " & clavex1
RS.Open(strSQL, objConn)
' con este ciclo puedo moverme entre los registros de la tabla
Do While Not RS.EOF
// acciones a realizar
RS.MoveNext()
Loop`
RS.Close()
RS = Nothing
NOTA: se debe poner compatibilidad con asp en la primer linea de la pagina en vista HTML
<%@ Page Language="vb" AspCompat="true"%>
y se deben asignar permisos en SQL Server a la cuenta ASPNET para que pueda ver y utilizar la BD.
bueno eso es todo, espero le pueda servir a alguien mas. asta pronto.
hola alguien me puede ayudar y me puede confirmar lo siguiente
declaro los objetos a utilizar
Dim objConn, RS, adOpenKeySet, adLockOptimistic As Object
Dim strSQL As String
adOpenKeySet = 1
adLockOptimistic = 3
' creo la coneccion al servidor SQL Server
objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=SQLOLEDB; DATA SOURCE=localhost" & _
"Integrated Security=SSPI; Initial Catalog=MiBase"
objConn.Open()
' creo y asigno propiedades al RS para que pueda desplazarse en los registros
RS = Server.CreateObject("ADODB.Recordset")
RS.CursorType = adOpenKeySet
RS.LockType = adLockOptimistic
' se habre la coneccion y se le asigna lo que esta en la consulta al RS
strSQL = "select * from tablavar where id = " & clavex1
RS.Open(strSQL, objConn)
' con este ciclo puedo moverme entre los registros de la tabla
Do While Not RS.EOF
// acciones a realizar
RS.MoveNext()
Loop`
RS.Close()
RS = Nothing
este codigo me sirbe para recorrer un dataset mi correo es
inmaculada104@hotmail.com muchas gracias un saludo