麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 學院 > 開發設計 > 正文

用ADO壓縮Access2000庫

2019-11-17 05:31:15
字體：大 中 小
來源：轉載
供稿：網友

　　#include  "utilcls.h"  

void  CompactDatabase(String  f1,String  psw1,  String  f2,String  psw2)    
{    
       String  PRovider1="Provider=Microsoft.Jet.OLEDB.4.0;Data  Source="  
               +  f1  +  ";Jet  OLEDB:Database  PassWord="  +  psw1;    
       String  Provider2="Provider=Microsoft.Jet.OLEDB.4.0;Data  Source="  
               +  f2  +  ";Jet  OLEDB:Database  Password="  +  psw2;    

       Variant  Adoobj=Variant::CreateObject("JRO.JetEngine");    
       Adoobj.OleProcedure("CompactDatabase",Provider1,Provider2);  
       AdoObj.Clear(  );      //  釋放  ADO對象    
}  

void  __fastcall  TForm1::Button1Click(TObject  *Sender)  
{  
         String  f1="yhecdagl1.mdb";          //  源庫1  
         String  psw1="yhecdagl";                //  密碼1  

         String  f2="yhecdagl2.mdb";          //  新目的庫2  
         String  psw2="yhecdagl2";              //  新密碼2  

         String  dir=ExtractFilePath(application->ExeName);  
         if  (FileExists(f2))  
                 DeleteFile(f2);  

         CompactDatabase(dir+f1,psw1,dir+f2,psw2);  
         ShowMessage("Finished");  
}

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 国产精品成人免费一区久久羞羞 | 久久国产精品影视 | h视频免费看 | 精品无码一区在线观看 | 7777奇米成人四色影视 | 狠狠干天天操 | 亚洲国产馆 | 欧美亚洲免费 | 精品一区二区三区免费看 | av在线免费看网址 | 狠狠干天天操 | 91久久极品少妇韩国 | 操碰视频在线观看 | 欧美日韩一区,二区,三区,久久精品 | 99亚洲伊人久久精品影院红桃 | 在线成人精品视频 | www.99久 | 狠狠操视频网站 | 欧美日韩高清一区二区三区 | 日韩毛片网 | 久久久鲁 | 在线播放亚洲精品 | 一本色道久久99精品综合蜜臀 | 久久精品成人影院 | 久在线观看福利视频69 | 国产91九色视频 | 高清做爰免费无遮网站挡 | 日韩字幕| 中文字幕在线第二页 | 国产成人综合在线观看 | 国产精品久久久久久久久久久久午夜 | 亚洲午夜免费 | 一色屋任你操 | 日本人乱人乱亲乱色视频观看 | 久久精品一区视频 | 极品一级片 | 黑人一区二区 | 亚洲爱爱网站 | 中国女警察一级毛片视频 | 一区在线视频观看 | 久久久国产精品免费观看 |