FiveTech Software tech support forums

METHODS: RecCount(), LastRec(), KeyCount(),RecNo(), KeyNo() GoTop(),GoBottom(),GoTo(nRec),KeyGoTo(nKey),Skip(n) FCount(),FieldPos(c),FieldName(),FieldLen(),FieldDec(),FieldType() FieldGet(),FieldPut() SetOrder(cSort,,lDescend) Save() Close() or End() --------------- NOT SUPPORTED: ...

... oRs:Fields:Count With ADO, oRs:Fields:Count(), whatever be the database. With FWH native MySql/Mara library, both work oRs:Fields:Count() or oRs:FCount(). The native library supports both complete ADO syntax as well as normal DB syntax like TDolpin, TMySql, etc

MI estimado...
con MariaDb, oDat:FCount()

hi Otto, have you tried inserting some dummy data into your initial `aData`? LEN(aArray) is much bigger than 1 and "wide" is FCOUNT(). but with my CODE it show only 1st Column "A" when assign "on-fly" to XBROWSE --- instead of APPEND to DBF i want to "show" ...

(cAlias)->( FCount() )

Cannot find definition for DBI_PASSWORD here are all DBI_ the constant i found for dbinfo() /* constants for dbInfo() */ #define DBI_ISDBF 1 /* Does this RDD support DBFs? */ #define DBI_CANPUTREC 2 /* Can this RDD Put Records? */ #define DBI_GETHEADERSIZE 3 /* Data file's header size */ #define DBI...

... los campos a grabar. Habria que inventar algo para que se hiciera un traspaso en bloque... algo parecido a usar __dbTrans Mientras, usar Local nFCount:= ::FCount() en FOR nField:= 1 TO nFCount, y similares variables, puede ayudar un poco... muy poco... La clave es el bucle FOR y el copiado campo ...

oCurrentRs := oCn:Query( "SELECT * FROM CUSTOMER" )

oNewRow := oCn:Query( "SELECT * FROM CUSTOMER WHERE ID < 0" ) //Get an empty row (There is no customer has a negative id)

FOR nI=1 TO oCurrentRs:FCount()
oNewRow:FieldPut(nI, oCurrentRs:FieldGet(nI))
NEXT

Como posso atribuir um valor a objeto da tdolphin? estou fazendo assim, mais nao funciona: nLenImportar := oProdutoImportar:Fcount() nLenRow := oRow:Fcount() for x := 1 to nLenImportar for y := 1 to nLenRow if Alltrim(oProdutoImportar : FieldName( x )) == Alltrim(oRow : FieldName( y ...

... Fact(<nInteger>)->nFactorial Fahrenheit(<nCelsius>)->nFahrenheit FClose(<nHandle>)->lError FCount()->nFields FCreate(<cFile,[<nAttibute>])->nHandle FErase(<cFile>)->nSuccess FError()->nErrorCode Field(<nPosition>)->cFieldName ...

... DToS ElapTime Empty Enhanced Eof EoM EoQ EoY Error ErrorBlock ErrorLevel ErrorNew ErrorSys Eval ExeName Exp Expand Exponent Fact Fahrenheit FClose FCount FCreate FErase FError Field FieldBlock FieldDec FieldDeci FieldGet FieldGetArr FieldLen FieldName FieldNum FieldPos FieldPos FieldPut FieldPutArr ...

... is .t. and FieldPut() method when ::lBuffer is .f. Application programs may use this method only when DBF is directly modified at RDD level. 31. FCount() Total number of fields, including virtual fields created by programmer using ::AddCol() method 32. FieldBlock( nCol ) returns FIELDWBLOCK() ...

Antonio buenas noches, ahora son estos: Proyecto: Kept5, Entorno: BorlandDLL: [1]:Harbour.Exe Source\Tseguro.prg /m /n /es2 /ki /iP:\32bits\xharbour\include;P:\32bits\FWH\INCLUDE /i /oObj\Tseguro.c xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406) Copyright 1999-2009, http://www.xharbour.org http:...

Antonio buenos dias, gracias por la ayuda Agrego la VM.LIB (xharbour), y me manda estos errorres :( :( Proyecto: Kept5, Entorno: BorlandDLL: [1]:Harbour.Exe Source\Tseguro.prg /m /n /es2 /ki /iP:\32bits\xharbour\include;P:\32bits\FWH\INCLUDE /i /oObj\Tseguro.c xHarbour Compiler build 1.2.1 (SimpLex)...

... local nRow, nCol, nCols, uVal, uVal2 FW_SetUnicode( .t. ) DEFINE WINDOW oWnd oClp := TClipboard():New() USE "AA_CHN" GO TOP nCols := FCount() oExcel := ExcelObj() oBook := oExcel:WorkBooks:Add() oSheet := oBook:ActiveSheet uVal := FieldGet( 1 ) scrivicella( "A1" , uVal , ...