程序開始時候 檢測某一項組側表鍵值

nRootKey = HKEY_LOCAL_MACHINE; 
              
if (RegDBSetDefaultRoot (nRootKey) < 0) then
    MessageBox ("First call to RegDBSetDefaultRoot failed.", SEVERE);
    abort;
else
    // MessageBox ("Root key successfully set to HKEY_LOCAL_MACHINE.",INFORMATION);
endif;

//取安裝路徑
szKey="SOFTWARE//XXXXX//XXXXX";
if RegDBKeyExist(szKey) = 1 then         
    //存在這個項,取這個項下的鍵值
    nSize=-1;
    nType=REGDB_STRING; 
    //取更新需要的安裝路徑
    szName="Path";
    RegDBGetKeyValueEx (szKey, szName, nType, szPath, nSize);
    //獲取後設置更新需要的安裝路徑
    TARGETDIR=szPath;
    //獲取已經安裝的版本號碼,用以比對。
    szName="Ver";
    RegDBGetKeyValueEx (szKey, szName, nType, szServer, nSize);                   
else
    //如果沒有這個註冊項,退出升級程序,第2次檢測註冊表。
    // MessageBox("升級程序在非法安裝的程序上無效,請重新安裝正確補丁文件",SEVERE);
    //abort;
endif; 
       
if szServer="X.XX.XXXX" then
    MessageBox("goto  Dlg_SdAskDestPath2; ",SEVERE); //存在的的話做進入到更新界面           
    goto  Dlg_SetupType2; //直接進入安裝過程界面
else 
    MessageBox("goto  Dlg_Start; ",SEVERE); //不存在的話進入到初始安裝界面
    goto  Dlg_Start;
endif;

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章