熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> SQL語言 >> 正文

用IS5.0將數據庫的DSN自動添加ODBC中[2]

2013-11-13 12:34:55  來源: SQL語言 
    
  // your global variables
  // 在 此 定 義 你 的 全 局 變 量 第 二 段 程 序 開 始 點
  STRING szstrnameszstrvaluesvlogfile;
  STRING szstrnameszstrvalue;
  STRING szstrnameszstrvalue;
  STRING szstrnameszstrvalue;
  STRING szstrnameszstrvalue;
  STRING szstrnameszstrvalue;
  STRING szstrnameszstrvalue;
  STRING szstrnameszstrvalue;
  NUMBER nvsizenvType;
  // 第 二 段 程 序 結 束 點

  ⑶ 注 冊 表 修 改

  程 序 中 找 到setrpregistry 函 數:
  function SetupRegistry()
  begin
  //modify_source
  // 加 入 注 冊 表 信 息 第 三 段 程 序 開 始 點
  szstrname = Agent;
  szstrvalue = engine;
  szstrname = AutoStop;
  szstrvalue = Yes;
  szstrname = DatabaseFile;
  //TARTGETDIR 為 全 局 變 量 指 安 裝 完 畢 後 程 序 的 路 徑
  szstrvalue = TARGETDIR ^\\cdb;
  szstrname = DatabaseName;
  szstrvalue = c;
  szstrname = Driver;
  szstrvalue = TARGETDIR ^\\WODTDLL;
  szstrname = PWD;
  szstrvalue = ;
  szstrname = Start;
  szstrvalue = TARGETDIR ^\\rtdskexe;
  szstrname = UID;
  szstrvalue = ;
  // 注 冊 表 入 口
  RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
  // 生 成 注 冊 表 信 息 的 各 級 分 支
  InstallationInfo(COMPANY_NAMEPRODUCT_NAMEPRODUCT_VERSIONPRODUCT_KEY);
  DeinstallStart(DEFAULT_LOG_PATHsvlogfileDEINSTALL_KEY);
  // 向 注 冊 表 的 分 支 中 加 入 鍵 名 和 鍵 值
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  RegDBSetAppInfo(szstrnameREGDB_STRINGszstrvalue);
  // 第 三 段 程 序 結 束 點
  return ;
  end;

  以上程序完成了將數據庫的DSN自動添加到ODBC中的整個過程安裝完畢後不用手工添加運行程序即可成功連接數據庫

[]  []  


From:http://tw.wingwit.com/Article/program/SQL/201311/16180.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.