access数据库不能删除

[成都清香白莲]

我建了一个access数据库
CreateAccess: OleVariant;
CreateAccess:= CreateOleObject('ADOX.Catalog');
CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(paramstr(0))+'Temp\'+'Server.mdb');


删除的时候删不掉

FData.Wnd:= 0;
FData.wFunc:= FO_DELETE;
FData.pFrom:= PChar('Temp');
FData.fFlags:= FOF_ALLOWUNDO or FOF_NOCONFIRMATION;
ShFileOperation(FData);
系统探出提示框
无法删除Server:文件正在被另一个人或程序使用


请问大虾怎样解决

[劣势]

学习

[cdsgajxlp]

先清除所有连接，在删除库

[成都清香白莲]

全部close和free了，问题依旧

[cdsgajxlp]

先备份库

把程序关闭掉，删除库
如果能删除掉说明是程序的问题，删除不掉，就是有用户在使用

[yiyideyi]

先删同目录下的*.ldb文件，再删数据库文件试试。

[liangyong007a]

你确定？

[成都清香白莲]

1、手工删除可以
2、程序的开始我也放了同样的删除语句，下一次执行时开始处的删除没有问题，但后面的删除还是老问题；
3、adoqryC.Close;
adoqryC.Free;
adoqryS.Close;
adoqryS.Free;
adocnnS.Close;
adocnnS.Free;
adocnnD.Close;
adocnnD.Free;
算不算释放掉了

[成都清香白莲]

有谁知道吗

[成都清香白莲]

前面用了Create,是不是需要释放，但怎样释放CreateAccess（OleVariant类型），用free,close都要抱错