jejeje.
Haber, vamos por orden, de antemano una disculpa
pero entendí mal que es lo que querias, en verdad entendí que querías guardar las sentencias en arreglos , No lei bien
Vamos por pasos:
1.- ¿guardar los resultados en un arreglo no?
2.- Utilizar getrows()
3.- Recorrer el arreglo bidimensional
Mas detallado:
' En esta variable guardamos el arreglo [el resultado de la sentencia]
Dim aTable1Values
' una instruccion cualquiera...
sql="select * from ordenes order by documento asc"
ob_rs.Open sql,cl
Pasamos todo al arreglo....
aTable1Values = ob_rs.GetRows()
'liberamos ya... que alivio!!!
set ob_rs=nothing
set cl=nothing ' esta es la conexión....
'algunas constantes, que en realidad serán los campos, es más fácil así ya que nos confundiriamos.
const status=3
'obtenemos el Numero máximo de filas
max=UBound(aTable1Values, 2)
'vamos iterando x cada columna
For iRowLoop = 0 to max
response.write "El estatus es " & Table1Values(status, iRowLoop) & "<br>"
next
En resumen, se guarda en un arrglo de 2 dimensiones el resultado...
la primera dimensión se guardan los campos, osea que en vez de poner
Table1Values(status, iRowLoop)
podríamos poner....
Table1Values(3, iRowLoop)
El 3 es el número que ocupa el campo en la B.D.
La segunada dimensión te guarda las filas.... y recuerda que la primera las columnas de tu B.D.
Suerte
