InstallShield 2010 中判断 IIS是否有安装及版本

 begin
  RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE); 
  szKey = "SOFTWARE\\Microsoft\\InetStp";  
  szName = "MajorVersion";                 
  szType ="UD"; //I为安装 D为中间层
  nvType = REGDB_STRING;
  if(RegDBGetKeyValueEx(szKey, szName, nvType, svValue, nvSize) < 0) then      
  else
   StrToNum(nvVersion, svValue); 
   if ( nvVersion == 6 ) then
    szType = szType ^"6";
   elseif(nvVersion >= 7) then
    szType = szType ^"7";
   endif;    
  endif; 
  regExe = CommonFilesFolder ^" \\E_DAS\\SetupRegistry.exe";
  LaunchAppAndWait(regExe,szType,WAIT);
end;