FiveTech Software tech support forums

... el ADOERROR sale del programa. ¿alguna pista? Gracias desde ya: cQry = "select * from autores" oRS:cursorLocation = 3 //adUseClient oRS:lockType = 3 //adLockOptimistic oRS:cursorType = 2 //adOpenDynamic oRS:source = cQry oRS:activeConnection = oServer TRY oRS:open() CATCH oError ? "Build ...

... oCmd :ActiveConnection(oCon) oRS := TOleAuto():New("adodb.recordset") oRS :CursorLocation := adUseClient oRS :LockType := adLockOptimistic <------------ TIPO DE BLOQUEO oRS :CursorType := adOpenKeyset oRs:ActiveConnection(oCon) oRs:Source := "SELECT ...

... oCmd :ActiveConnection(oCon) oRS := TOleAuto():New("adodb.recordset") oRS :CursorLocation := adUseClient oRS :LockType := adLockOptimistic <------------ TIPO DE BLOQUEO oRS :CursorType := adOpenKeyset oRs:ActiveConnection(oCon) oRs:Source := "SELECT ...

... ) oRecordSet[nRecordSet]:CursorLocation := adUseClient oRecordSet[nRecordSet]:CursorType := adOpenStatic oRecordSet[nRecordSet]:LockType := adLockPessimistic oRecordSet[nRecordSet]:Open( "Select "+ cSelect +" from " + cTabla + " ORDER BY "+cOrder+" ...

see exemple try oRs := CreateObject("ADODB.RecordSet") oRs:CursorLocation := adUseClient oRs:LockType := adLockOptimistic oRs:CursorType := adOpenDynamic oRs:ActiveConnection := "Provider=VFPOLEDB.1;Data Source="+Curdrive()+":\"+Curdir()+";Mode=Read;Extended ...

see example, try oRs := CreateObject("ADODB.RecordSet") oRs:CursorLocation := adUseClient oRs:LockType := adLockOptimistic oRs:CursorType := adOpenDynamic oRs:ActiveConnection := "Provider=VFPOLEDB.1;Data Source="+Curdrive()+":\"+Curdir()+";Mode=Read;Extended ...

       oBrw12:SetAdo(oBrw12) //,.t.,.t.)  //oLbx:SetRDD()  The above line should be:        oBrw12:SetAdo(oDat12, .f. ) // second param .f. is to prevent xbrowse to create all columns automatically  Also this line should be the ...

Ya te anexe el codigo...

Can you post a small self contained sample please?

Me genera un error con Xbrowse , cuando consulta la tabla directamente funciona bien cuando genero un asentencia sql para generar un consulta me sale este error. http://img715.imageshack.us/i/errorvk.jpg/     cQue4 := "SELECT referen,descrip,um,stock,sto_con,catval FROM referenc...

Amigo norte_67, Para los dos primeros, ( que son warning's no errores ) cursortype y locktype que son ?, son variables ?, si es asi te falta definirlas como local o private en la funcion y darles valor , si son constantes declaradas te falta el #define y el valor, ...

... oProducto:CursorLocation:= adUseClient oProducto:Open("SELECT * FROM b_art WHERE cod_art = "+ Alltrim(cArticulo), oConexion,CursorType,LockType) if (oProducto:RecordCount)==0 Msginfo("Existe") Else MsgInfo("No Existe") Endif Return estoy haciendo una busqueda con ...

... oCliente:CursorLocation:= adUseClient oCliente:Open("SELECT * FROM clientes ORDER BY codigo ",oConexion,CursorType,LockType ) ahilo ordena y listo y para buscar por codigo basta con: xCodigo:=1010 oCliente:=TOleAuto():New("ADODB.Recordset") oCliente:CursorLocation:= ...

otra cosa, en casi todos lados encuentro este codigo WITH OBJECT oRs :CursorLocation := 3 //AdUseClient :LockType := 3 //adLockOptimist :CursorType := 2 //adOpenKeyset :Source := cSql :ActiveConnection( oCn ) END pero a mi no me funciona asi, me da error de argumentos en :activeconnection, ...

... Data1 Local oError Data1:=tOleAuto():New("ADODB.RecordSet") Data1:CursorLocation := adUseClient Data1:CursorType := adOpenDynamic Data1:LockType := adLockOptimistic Data1:ActiveConnection := oCone Data1:Source := "CREATE TABLE BANCOS ( Registro COUNTER, Numero NUMBER, " + ; ...