DBFILEGET() Insert the contents of a field into a file ------------------------------------------------------------------------------ Syntax DBFILEGET(<nFieldPos>, <cTargetFile>, <nMode>) --> lSuccess Arguments <nFieldPos> is the position of the field in the database file structure. <cTargetFile> is the name of the file where the field data will be written, including an optional drive, directory and extension. See SetDefault() and SetPath() for file searching and creation rules. No default extension is assumed. If <cTargetFile> does not exist, it is created. If it exists, this function attempts to open the file in exclusive mode and if successful, the file is written to without warning or error. If access is denied because, for example, another proess is using the file, NetErr() is set to TRUE. <nMode> is a constant defining the copy mode, as shown in the table below: DBFILEGET() Constants ------------------------------------------------------------------------ Constant Description ------------------------------------------------------------------------ FILEGET_APPEND Appends to the file. FILEGET_OVERWRITE Overwrites the file. This is the default. ------------------------------------------------------------------------ Returns DBFILEGET() returns true (.T.) if successful; otherwise it returns false (.F.). Description DBFILEGET() provides a mechanism for copying the contents of a field into a file. By default, this function operates on the currently selected work area. It can be made to operate on an unselected work area by specifying it within an aliased expression. DBFILEGET() is used in conjunction with DBFILEPUT() to transfer data back and forth between files and database fields. Examples . This example exports the contents of a field that stores a picture to a .GIF file, so that the file can be programmatically displayed: FUNCTION ShowPix() LOCAL cPixFile := "picture.gif" LOCAL nPos // Customer database with a picture of each // customer stored in a field called "Pix" USE customer NEW VIA "DBFCDX" nPos := FieldPos("Pix") // Export the file's data for the current Pix field IF ! DBFILEGET(nPos, cPixFile, FILEGET_OVERWRITE ) Alert("Export of picture " + cPixFile + " failed!") ELSE // Code for displaying picture would go here ENDIF Files Library is CLIPPER.LIB, header is Dbinfo.ch
See Also: DBFILEPUT()