You should be ablt to figure this one out....

SELECT pictures
* Make sure the created file contains this picture only!
COPY TO &lcdbf FIELDS &pcfield &pnfor && for upper(&pcField)=upper(pcPict)
lnhandle=FOPEN(lcfile + '.fpt')
lnhandleout=FCREATE(lcfile + '.bmp')
=FSEEK(lnhandle, 599)
DO WHILE !FEOF(lnhandle)
=FWRITE(lnhandleout, FREAD(lnhandle, 512), 512)
ENDDO
=FCLOSE(lnhandle)
=FCLOSE(lnhandleout)


>Hi All,
>I have BMP's in a general field in an app, and I would like to extract them to BMP's. I'm running VFP 7. How can I go about doing this?
>
>Thanks.
>
>Daniel