pb中压缩整理access数据库文件(mdb)

转载 2012年03月30日 21:45:33

pb中压缩整理access数据库文件(mdb) 

(加入日期:2005-3-7)

保存文章至硬盘】【打印文章】【字体:

分享到: 0
       下面直接给出方法函数:

       1、申明外部函数,用来取系统的临时路径。  FUNCTION ulong GetTempPath(ulong nBufferLength,ref string lpBuffer) LIBRARY "kernel32.dll" ALIAS FOR "GetTempPathA"

      2、核心方法:

  global type gf_CompactAndRepairAccessDB from function_object
end type
forward prototypes
global function integer gf_compactandrepairaccessdb (string as_mdb)
end prototypes
global function integer gf_compactandrepairaccessdb (string as_mdb);
//检查数据库文件是否存在
if not FIleExists(as_MDB) then return -1
//创建临时文件名
string ls_tmpFIle
ls_tmpFIle =Space(255)
GetTempPath(255,ls_tmpFIle)
ls_tmpFIle+="temp.mdb"
//创建DBEngine
integer result
oleobject ole_DBEngine
ole_DBEngine = create oleobject
result =ole_DBEngine.connecttonewobject("JRO.JetEngine")
//创建失败
if  result<>0 then return result
//通过DBEngine 压缩数据库文件
string sProvider = 'Provider=Microsoft.Jet.OLEDB.4.0;'
string sOldMDB,sNewMDB
sOldMDB = sProvider + 'Data Source= ' + as_MDB
sNewMDB = sProvider + 'Data Source= ' + ls_tmpFIle
ole_DBEngine.CompactDatabase(sOldMDB, sNewMDB)
destroy ole_DBEngine
//拷贝刚刚压缩过临时数据库文件至原来位置
FIleCopy(ls_tmpFIle,as_MDB,true)
//删除临时文件
FileDelete(ls_tmpFIle)
return 0
end function

    3、调用方法  

gf_compactandrepairaccessdb("E:\eNo\collect.mdb")



       应注意的是,在压缩和修复数据库的过程中,不能有其它的操作打开该数据库,否则操作会失败,因此请先关闭掉该数据库的连接,否则执行会报错。

       此外这个函数经过修改后,可实现备份数据库的功能,相比较更简单一些,这里就不提供了。

相关文章推荐

如何通过ODBC将Access数据库文件(.mdb)导入sql server2000

(一)建立ODBC立数据源        打开”控制面板“下”管理工具“中的”数据库源“;按”添加“添加一个新的数据源,在选择栏里选”Driver do microsoft Access (*....
  • twtiqfn
  • twtiqfn
  • 2013年09月11日 08:06
  • 6187

通过js实现网页与Access数据库(后缀名为mdb)的联动

此处包含以下三种情况: 1、单行数据一个表格; 2、多少行数据多少个表格; 3、一个表格多行数据 //1.联动到Access数据库的一个方法(最多只有一行数据时); function load...

SQL2008链接Access数据库(.mdb)实现方法

SQL2008链接Access数据库(.mdb)实现方法在SQL SERVER里面叫做LINKED SERVER,通过ODBC实现与Access数据库的互联。第一步、依次打开:控制面板\所有控制面板项...

操作、压缩MDB文件;使用ADO读写Mysql数据库;建立数据库和表的VBS脚本代码(2013-08-26 11:39:34)

 mysql数据库sql语句: UPDATE user_wealth SET Gold=9999999 WHERE UserID=164 CALL sp_user_login('t1', '...

php 访问access mdb文件的类

access,mdb,adSchemaTables,adSchemaColumns,OLEDB,COM,ADODB.Connection
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:pb中压缩整理access数据库文件(mdb)
举报原因:
原因补充:

(最多只允许输入30个字)