!Ayuda! recordset.BookMark

[mchumpitazv]

#include "Ado.ch"
Saludos a Todos

Espero que no este siendo pesado con este tema pero la verdad estoy plantado por ello y no tengo opcion a seguir he leido temas de Ado, buscado temas en este forum y aun nada, en la linea msgalert(oRs:Supports( adBookmark )) se devuelve omo resultado .F. (quiere decir que mi recordset no acepta bookmark)
y no se el porque, estoy conectado a una base MS SQL 2000 y utilizo FWH 8.10 con xHarbour

En verdad agradecere me apoyen en este tema

Saludos

Luis

FUNCTION MainCmd()
LOCAL oConexionAdo := TOLEAUTO():New("adodb.connection")
LOCAL oComando := TOLEAUTO():New("adodb.command")
LOCAL oRecordset , reg1
LOCAL aDatos := {}
oConexionAdo:Open("Provider=SQLOLEDB.1;Password=;Persist Security Info=False;User ID=Martin;Initial Catalog=APPLOCAL;Data Source=PERLIM_SYS_LCH")
oComando:ActiveConnection(oConexionAdo)
oComando:CommandType:= 4
oComando:CommandText := "sp_Menu"
oRs := TOleAuto():New( "ADODB.Recordset" )
oRs:CursorType := adOpenKeyset
oRs:CursorLocation := adUseClient
oRs:LockType := adLockOptimistic
oRs:Open(oComando:Execute())
msgalert(oRs:Supports( adBookmark )) ---> Devuelve .F.
DO WHILE .NOT. oRs:Eof()
AADD(aDatos,oRs:Fields(0):value)
oRs:MoveNext()
ENDDO
MsgList(aDatos)
RETURN (.T.)