En ADO ignora un Select de mas de 255 caracteres.

Hola muchachos, gusto en saludarlos de nuevo, haber si me pueden ayudar,
estoy usando ADO con VFP 6.0 con SP5 y una base de datos Oracle 8i
tomo marchaba bien hasta que hice un Select de mas de 255 caracteres
VFP lo ignora y no se como hacerle, esto es lo que estoy haciendo.


WITH _screen

.AddProperty('ocnx',CREATEOBJECT('ADODB.Connection') )
.AddProperty('orcS',CREATEOBJECT('ADODB.RecordSet') )
.AddProperty('ocmd',CREATEOBJECT('ADODB.command') )

.AddProperty('octe1',CREATEOBJECT('ADODB.RecordSet') )
.AddProperty('octe2',CREATEOBJECT('ADODB.RecordSet') )

obj=.ocnx
IF TYPE("obj")#'O'
MESSAGEBOX('No se pudo conectar a la base de datos Oracle',48,'')
CANCEL
QUIT
ENDIF

.ocnx.Provider="OraOLEDB.Oracle"
.ocnx.ConnectionString="Data Source="+acdirempres+";User
ID=appbase;Password=appbase;"
.ocnx.mode=3
.ocnx.open
.ocmd.activeconnection=.ocnx
.oRcS.activeconnection=.ocnx
.oRcS.CursorType = 1
.oRcS.LockType = 3

.AddProperty('busdat',CREATEOBJECT('ADODB.RecordSet') )
.busdat.activeconnection=.ocnx
.busdat.CursorType = 1
.busdat.LockType = 3

.busdat.open("SELECT DE MAS DE 255 CARACTERES")

ENDWITH

Este es un ejemplo de lo que hago y me atore en el SELECT anterior,
donde ya les dije que me ignora el OPEN
de antemano les agradezco su ayuda.

Gracias.

Jesús Aceves Arámbula.
Guadalajara Jalisco México.

Hola muchachos, gusto en saludarlos de nuevo, haber si me pueden ayudar,
estoy usando ADO con VFP 6.0 con SP5 y una base de datos Oracle 8i
tomo marchaba bien hasta que hice un Select de mas de 255 caracteres
VFP lo ignora y no se como hacerle, esto es lo que estoy haciendo.


WITH _screen

.AddProperty('ocnx',CREATEOBJECT('ADODB.Connection') )
.AddProperty('orcS',CREATEOBJECT('ADODB.RecordSet') )
.AddProperty('ocmd',CREATEOBJECT('ADODB.command') )

.AddProperty('octe1',CREATEOBJECT('ADODB.RecordSet') )
.AddProperty('octe2',CREATEOBJECT('ADODB.RecordSet') )

obj=.ocnx
IF TYPE("obj")#'O'
MESSAGEBOX('No se pudo conectar a la base de datos Oracle',48,'')
CANCEL
QUIT
ENDIF

.ocnx.Provider="OraOLEDB.Oracle"
.ocnx.ConnectionString="Data Source="+acdirempres+";User
ID=appbase;Password=appbase;"
.ocnx.mode=3
.ocnx.open
.ocmd.activeconnection=.ocnx
.oRcS.activeconnection=.ocnx
.oRcS.CursorType = 1
.oRcS.LockType = 3

.AddProperty('busdat',CREATEOBJECT('ADODB.RecordSet') )
.busdat.activeconnection=.ocnx
.busdat.CursorType = 1
.busdat.LockType = 3

.busdat.open("SELECT DE MAS DE 255 CARACTERES")

ENDWITH

Este es un ejemplo de lo que hago y me atore en el SELECT anterior,
donde ya les dije que me ignora el OPEN
de antemano les agradezco su ayuda.

Gracias.

Jesús Aceves Arámbula.
Guadalajara Jalisco México.