Saludos a Todos
Agradecere si alguno de ustedes me indica porque la lines: reg1:=oRs:bookMark() muestra el siguiente error:
Error description: Error ADODB.Recordset/6 DISP_E_UNKNOWNNAME: BOOKMARK
Args:
Stack Calls
===========
Called from: source\rtl\win32ole.prg => TOLEAUTO:BOOKMARK(0)
Called from: C:\SCOW\MAINCMD.PRG => MAINCMD(16)
A la espera de su pronta respuesta
Saludos
Luis
#include "Ado.ch"
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())
reg1:=oRs:bookMark()
DO WHILE .NOT. oRs:Eof()
AADD(aDatos,oRs:Fields(0):value)
oRs:MoveNext()
ENDDO
MsgList(aDatos)
RETURN (.T.)
Ayuda con error ADO:BookMark
- mchumpitazv
- Posts: 49
- Joined: Thu Dec 27, 2007 6:56 pm
- Location: Lima -Perú
- ruben Dario
- Posts: 986
- Joined: Thu Sep 27, 2007 3:47 pm
- Location: Colombia
Re: Ayuda con error ADO:BookMark
Porque no retiras la linea
reg1:=oRs:bookMark()
Si te funciona tienes que colocar una condicion que si no es fun de archivo lo ejecute.
reg1:=oRs:bookMark()
Si te funciona tienes que colocar una condicion que si no es fun de archivo lo ejecute.
- mchumpitazv
- Posts: 49
- Joined: Thu Dec 27, 2007 6:56 pm
- Location: Lima -Perú
Re: Ayuda con error ADO:BookMark
Hola Ruben
El punto es que al trabajar con Ado necesito capturar el registro(recno()) por lo cual necesito el metodo "bookmark", el problema es que muestra el error antes mencionado y no encuentro el porque.
Saludos
Luis
El punto es que al trabajar con Ado necesito capturar el registro(recno()) por lo cual necesito el metodo "bookmark", el problema es que muestra el error antes mencionado y no encuentro el porque.
Saludos
Luis