🚀 go-pugleaf

On Thu, 3 Dec 1998 16:36:32 -0600, John Staub wrote:

> I am using the following code (OODML I hope<g>) to open a new database, get
> some info from the table, do some other stuff, then delete all the records
> in the table, pack it, and then press on:
> ---snip snip
>       local oExcel, oRange,cText, q,r,i,nRow,d
>       d = new database()
>       d.databasename = "CERTLOCAL"
>       d.active = true
>       store 0 to oExcel,oRange,q,r,i,nRow
>       q := new query()

q.database = d

>       q.sql = "select * from temp"
>       q.active = true
> >> do some stuff with Excel here <<
> >> finished so let's dump all the records from temp.dbf and clean it up<<
> 
> >> this line works      delete from temp.dbf //mark all records for removal

// you can use this to delete and pack in one step
d.emptytable("TEMP)

q.active = false

// or pack the table before you close the database
d.packtable("TEMP")

>       d.active = false
// not the d.close() is not necessary.  Setting active=false does it.

>       return


Gary

Some dBASE Stuff at
http://www.AppTools.com/dbase