cMyImage = 'C:\mypath\myjpg.jpg'
lcfile2 = FILETOSTR(cMyImage)
CREATE CURSOR crsTest (Fld1 M NOCPTRANS)
INSERT INTO crsTest VALUES (lcfile2)
TEXT TO lcSQL NOSHOW PRETEXT 15 TEXTMERGE
    INSERT INTO MySQLTable (MyKeyField, MyStatus, MyLastName, MyImage)
                    VALUES (5,'A','Jones',CONVERT(varbinary(max),?crsTest.Fld1))
ENDTEXT
IF sqlexec(6,lcSql) < 0 && Hmmm 6? HA
   AERROR(laError)
   MessageBox(laError[1,2])
ENDIF

cMyImage = GETFILE()
lcfile2 = FILETOSTR(cMyImage)
TEXT TO lcSQL NOSHOW PRETEXT 15 TEXTMERGE
    INSERT INTO TestMe (MyTest)
                    VALUES (CONVERT(varbinary(max),<<0hlcfile2>>))
ENDTEXT
IF sqlexec(6,lcSql) < 0 && Hmmm 6? HA
   AERROR(laError)
   MessageBox(laError[1,2])
ENDIF