Thank you for answering George, the problem that I have is that some tables are free and some are not. I can't issue the FREE TABLE command for all of them because I am going to get error messages for the tables are that are already free. Below is the code is causing problems, I am trying to calculate the space required to do some data process.

LOCAL nAllFilesSize
nAllFilesSize = 0

nFiles = ADIR(aFiles,"*.DBF")
FOR a=1 TO nFiles
USE (afiles(a,1))
*---Get size of table header
nTableHead = HEADER()
*--- Calculate size of table
nFileSize = nTableHead + (RECSIZE() * RECCOUNT() + 1)
*--- Total Size for all files
nAllFilesSize = nAllFilesSize + nFileSize
ENDFOR

IF DISKSPACE() < (nAllFilesSize * 3)
MESSAGEBOX('Insufficient diskspace, process cannot be completed.',64,'System Message')
CLOSE DATA ALL
CANCEL
ENDIF



>>I have a database.
>>I have a table in the database.
>>I remove the database container.
>>I want to open the table without getting this error message "... or delete the link and free the table?" (LOCATE, DELETE, CANCEL)
>>
>>Is there a way to do this? Thank you in advance.
>
>Hi Morys,
>
>Look at the FREE TABLE command in help. If you issue this first, the back link to the database will be removed.