Hi Tore

I have ran my program and it returns nothing. Obviously I am new to this!

Function FileSizeInKB
lParameter cFilename
Local lcCompatible, lnReturn
lcCompatible=Set('compatible')
Set Compatible on
lnReturn=Fsize('U:\questpdm\picture\whatever.jpg')
Set Compatible &lcCompatible
Return lnreturn/1024

How do I check the value in a an IF condition to see if it is greater than or less than 500KB

Thanks Tore