请问:VB6中如何对ACCESS数据库进行压缩?
请问:VB6中如何对ACCESS数据库进行压缩?VB6中要对文件改名又是如何做的?
ADO 引擎好像有专门的函数来压缩数据库，我也不肯定
VB 没有提供改文件名的方法，但可以引用 FSO 对象(工程菜单-引用-选中 Microsoft Scripting Runtime)，然后写:
Dim FSO As New FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
If FSO.FileExists("文件名") Then
MsgBox "文件存在"
Else
MsgBox "文件不存在"
End If