|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% oldDB = "d:netaccessTest.mdb" bakDB = "d:netaccessTestBack.mdb" newDB = "d:netaccessCompact.mdb" Set FSO = Server.CreateObject("Scripting.FileSystemObject") \\\' back up database FSO.CopyFile oldDB, bakDB , true \\\' compact database Set Engine = Server.CreateObject("JRO.JetEngine") prov = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Engine.CompactDatabase prov & OldDB, prov & newDB set Engine = nothing \\\' delete original database FSO.DeleteFile oldDB \\\' Move (rename) compacted database FSO.MoveFile newDB, oldDB set FSO = nothing %> 返回类别: 教程 上一教程: ASP调用SQL SERVER存储程序 下一教程: 在ASP中使用SQL语句之2:用WHERE子句设置查询条件 您可以阅读与"介绍一个用ASP来压缩ACCESS数据库的例子"相关的教程: · 一个用asp+存取数据库的例子 · 在ASP中通过OO4O连接ORACLE数据库的例子 · ASP+Access数据库的终极安全方式18则 · 关于将数据成批导入新数据库的程序例子(ACCESS TO SQL) · ASP操作ACCESS数据库的程序 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |