当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: 下面的函数用来压缩access数据库 需要增加ComObj单元
 

 

 ·用delphi创建服务程序    »显示摘要«
    摘要: 用delphi创建服务程序......
 ·simulate the pressing of keyboard keys    »显示摘要«
    摘要: 1. postkeyex32 function} procedure postkeyex32(key: word; const shift: tshiftstate; specialkey: boolean); {************************************************************ * procedure postkeyex32 * * par......


用程序实现压缩access(*.mdb)数据库的方法.
下面的函数用来压缩access数据库 需要增加comobj单元

function compactdatabase(afilename,apassword:string):boolean; 【程序编程相关:ShadowStar CodeFast

【推荐阅读:代码优化分析一例

//压缩与修复数据库,覆盖源文件 【扩展信息:delphi调用sql-server20

const

  sconnectionstring = provider=microsoft.jet.oledb.4.0;data source=%s;

      +jet oledb:database password=%s;;

var

  spath,sfile:array [0..254] of char;

  stempfilename:string;

  je:olevariant;

begin

  gettemppath(40,spath);//取得windows的temp路径

  gettempfilename(spath,~cp,0,sfile);//取得temp文件名,windows将自动建立0字节文件

  stempfilename:=sfile;//pchar->string


...   下一页
    摘要: { diese unit kann in ein package compiliert werden und erscheint danach im delphi menu unter hilfe. } { this unit can be compiled into a package and will then appear in the delphi help menu. } unit s......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE