Hi Tracy,

Sounds like a good idea. Thanks for that.

Regards,
Gavin.

>As you have heard, it applies to them all. Here is a utility I run everytime the app exits so I can verify the file sizes never get too large:
>

>llok=checkfilesize()
>IF !llok
>	MESSAGEBOX('Your files need to be archived. Please contact Support.',0+48+4096,'Maximum file size exceeded')
>ENDIF
>
>FUNCTION checkfilesize
>maxsize = 20000000
>warnsize= 19998000
>lltoobig=.F.
>*--Location of tables
>ddir="\profiler\data\"
>*--Create an array to hold file list
>lnfiles=ADIR(filelist,ddir+'*.*')
>IF lnfiles>0
>	FOR i = 1 TO ALEN(filelist,1)
>		IF TYPE('filelist(i,2)')="N" .and. filelist(i,2)>warnsize
>			STORE .T. to lltoobig
>		ENDIF
>	ENDFOR
>ELSE
>	MESSAGEBOX("No files were found!",16+4096,"Error!")
>ENDIF
>IF lltoobig
>	RETURN .F.
>ENDIF
>RETURN .T.
>