如何关闭MDB文件？

[zhengyc653]

我用 SQLSTRINGCONNECT 建立了与MDB的连接，可要压缩修复数据库时，因为MDB文件处于打开状态，所以无法成功。必须先关闭才可以压缩成功，我把用来存放连接存放句柄的变量释放了也不行，clos all , clear all ，这些都不行。

[十豆三]

*在VFP中如何实现压缩ACCESS数据库

*-----------------------------------------------

*ADO方式:

Local lole
lole=Createobject('JRO.JetEngine')
strS1="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\TEMP\TEST.MDB;;Persist Security Info=False;Jet OLEDB:Database Password=;"
strT1="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\TEMP\NewTable.MDB;Jet OLEDB:Engine Type=5;"
lole.CompactDatabase(strS1,strT1)
Release lole

-----------------------------------------------

*DAO方式:

Local lole
lole=Createobject('DAO.DBEngine.36')
lole.COMPACTDATABASE('D:\TEMP\TEST.MDB','D:\TEMP\NewTable.MDB')
Release lole

[十豆三]

断开连接
SQLDISCONNECT(0)

[OooOooOooOooO]

1.断开连接
2.断开后释放连接句柄