loFSO = Createobject("Scripting.FileSystemObject")
filepath = 'U:\questpdm\picture\whatever.jpg'
loFile = loFSO.Getfile(filePath)
**** Remove TRANSFORM to see what happens:
IF loFile.Size<= 500000
   MESSAGEBOX("File Size is OK")
ELSE
    MESSAGEBOX("File Size is not OK - File Size="+TRANSFORM(loFile.Size) + CHR(13)+CHR(10)+;
               "Compare "+TRANSFORM(loFile.Size)+"<= 500 000 -> "+TRANSFORM(loFile.Size <= 500000) )
ENDIF