程序开始时候检测某一项组侧表键值

最新推荐文章于 2018-05-25 16:58:00 发布

lichongjun

最新推荐文章于 2018-05-25 16:58:00 发布

阅读量453

点赞数

分类专栏： InstallShield 文章标签： string path

本文链接：https://blog.csdn.net/lichongjun/article/details/3941679

版权

InstallShield 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

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;