Hola
u_goldman:
Pues intente con la solución que me facilitaste y nada... seguia marcando -1, asi que tuve que optar por el
GETROWS que propuso
Adler y la verdad fue facilisimo utilizarlo, solo basto un rato de esfuerzo.... el codigo usando
GETROWS quedo como sigue:
Código HTML:
<%
Dim rs, sql, documents
Dim i, j 'Para recorrer el vector
set rs=CreateObject("adodb.recordset")
sql="SELECT iddocumento,clavedoc FROM documentos"
rs.open sql,conexion
documents=rs.GetRows
rs.close
set rs=nothing
conexion.close
set conexion=nothing
response.write("<table>")
for i=0 to Ubound(documents,2)
response.write("<tr>")
for j=0 to Ubound(documents,1)
response.write("<td>"& documents(j,i) &"</td>")
next
response.write("</tr>")
next
response.write("</table>")
total = UBound(documents,2)+1
response.write("Total de Registros: "&total)
%>
Gracias a todos por ayudar, a final del dia lo bueno siempre es resolver como sea el problema....
Saludos
Adler , u_goldman 
¡Utiliza GetRows!