Exports the current media type (such as jpeg image) that is used on record to a file on your computer or network. In the record, the media is referenced in a Media data type field.
[Ok := ] Record.Media.EXPORTFILE(FileName) |
Parameters
- Record
- Type: Record Specifies the record that includes the media.
- Media
- Type: Media Specifies the field of the record that includes the media. This field has the Media data type.
- FileName
- Type: Text Specifies the full path and name of the file to create for the exported media.
Property Value/Return Value
Type: Boolean
true if the media was successfully exported; otherwise, false.
Remarks
The exported media file will be of the same media file type as when they were imported, such as .jpg or .gif. For more information about the media types, see Adding Media on Records.
If a file with the same name as the exported file already exists in the target folder and the current session has write access on the file, the existing file will be automatically replaced by the new file. If the export fails, the existing file will be erased.
Example
This example uses the EXPORTFILE to iterate over the Item table and export any media that is used on records to a file in a temporary folder. A separate file is created for each media.
This example assumes that Item table contains a Media data type field that is named itemPicture, and that you have imported some image files on records. For information about importing media, see IMPORTFILE Function (Media).
The example code requires that you create the following variables:
Variable name | DataType | Subtype |
---|---|---|
Item | Record | Item |
FileName | Text | |
status | Boolean |
This code iterates over records in the Items table. If a record has a media reference in the itemPicture field, the media is exported to a file in the C:\image folder and given a name in the format ItemNNNN.jpg, where NNNN is the actual item number in the database.
Copy Code | |
---|---|
IF Item.FINDFIRST() THEN BEGIN REPEAT FileName := 'C:\images\' + 'Item' + FORMAT(Item."No.") + '.jpg'; status := Item.itemPicture.EXPORTFILE(FileName); UNTIL Item.NEXT < 1; END; |