❶ 怎样减少ACCESS数据库大小
我的下面一些经验可以为你的问题提供答案。
常规办法:
1)删除不必要的数据和无用的ACCESS数据库对象例如表、查询、窗体和模块等;
2)压缩数据库
ACCESS2003压缩举例:打开数据库,点击菜单(工具)——数据库实用工具——压缩和修复数据库
非常规办法:
ACCESS数据库经过一段时间添加、更改和删除数据库对象后会产生很多代码及数据库对象碎片和垃圾,对于这些东西常规办法是无法清除的。这也是为什么你的ACCESS数据删除很多数据后,大小不变的原因所在。
怎么办呢?可以这样做:先建立一个同名空白数据库,放在另一个文件夹下,接着打开该空白数据库,导入原数据库全部有用的对象(包括:表、窗体、查询、模块、页、宏,无用的不要导入)
ACCESS2003导入对象举例:文件——获取外部数据——导入 ,打开“导入”对话框选择需要缩小的数据库后,点击导入按钮,打开“导入对象”对话框 选择全部有用的数据库对象,例如表、窗体等等后点击“确定”按钮 完成导入全部数据库对象。
经过上述过程后,所有的数据库垃圾都会被清除掉。再对其进行一次压缩操作,ACCESS数据库将会处在理论上最小状态。
❷ asp如何压缩access2003
利用一个引擎DLL
<div><br>
<div align="center">运行环境:在WIN98SE+PWS、WIN2000+IIS5.0 <br>
<%
Const JET_3X = 4
Function CompactDB(dbPath, boolIs97)
Dim fso, Engine, strDBPath
strDBPath = left(dbPath,instrrev(DBPath,"\"))
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists(dbPath) Then
Set Engine = CreateObject("JRO.JetEngine")
If boolIs97 = "True" Then
Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & dbpath, _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath &
"temp.mdb;" _
& "Jet OLEDB:Engine Type=" & JET_3X
Else
Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & dbpath, _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath &
"temp.mdb"
End If
fso.CopyFile strDBPath & "temp.mdb",dbpath
fso.DeleteFile(strDBPath & "temp.mdb")
Set fso = nothing
Set Engine = nothing
CompactDB = "你的数据库, " & dbpath & ", 已经被压缩" & vbCrLf
Else
CompactDB = "你输入的数据库路径或名称未找到,请重试" & vbCrLf
End If
End Function
%>
</div>
</div>
<form name="compact" method="post" action="compact.asp">
<div align="center"><font size="2"><b>
<font color="#FF0000">压缩选项,请仔细填写!</font></b><br>
<br>
输入数据库全称:
<input type="text" name="dbpath">
(包括扩展名,如MDB、ASA、ASP等)<br>
<br>
<input type="checkbox" name="boolIs97" value="True">
检查是否为ACCESS97数据库<br>
(默认为ACCESS2000的数据库)<br>
<br>
<input type="submit" name="submit" value="确认压缩">
</font></div>
</form>
<div align="center"><font size="2">
<%
Dim dbpath,boolIs97
dbpath = request("dbpath")
boolIs97 = request("boolIs97")
If dbpath <> "" Then
dbpath = server.mappath(dbpath)
response.write(CompactDB(dbpath,boolIs97))
End If
%>
<br>
</font></div>
❸ 怎样压缩和修复Access文件
压缩和修复未打开的 Access 文件
启动Microsoft Office Access 2003,单击“工具”菜单,打开的菜单指向“数据库实用工具”,在下一级菜单中单击“压缩和修复数据库”命令
在“压缩数据库来源”对话框中找到并选中要进行压缩和修复的Access文件,单击“压缩”按钮
在“将数据库压缩为”对话框中定位到要保存压缩Access 文件的位置,单击“保存”按钮
4
现在在存储Access 文件的位置中就会生成一个扩展名为mdb的Access文件,这就是压缩和修复过的Access 文件