Hi,
My code is like something below, insteads of purging and packing my
file, it just ignore it and go to the end like nothing had happened.
I am sure that my file is not open or use by other in the process.
WHILE NOT EOF("MyList")
IF FILE("xx.dbf")
USE xx.dbf EXCLUSIVE
IF USED("xx") AND ISEXCL("XX")
SELECT xx
DELETE ALL FOR CLOSING = pvClosing
PACK
ENDIF
ENDIF
IF FILE("yy.dbf")
USE yy.dbf EXCLUSIVE
IF USED("yy") AND ISEXCL("yy")
SELECT yy
DELETE ALL FOR CLOSING = pvClosing
PACK
ENDIF
ENDIF
Messagebox("All purging done")
ENDDO
>Hi Virusm,
>
>Can you provide more details, post some relevant code?
>
>>Hi,
>>
>>I had a VFP5 written application that just open some
>>dbf file in exclusive mode, delete some record, pack it.
>>
>>All this is done in a while loop until the master record is from a file list where it will indicate which file to delete and pack.
>>
>>However, when I run my application, it is running fine without any error,
>>but don't pack or delete my dbf file.
>>
>>But when I add some delay like WAIT '' TIMEOUT 2 command, it actually
>>delete and pack my application.
>>
>>I am running on win2000.
>>
>>What is causing this problem, please kindly advise and help.
>>Thank a lot.
Best Regards
Virusim