function OnAppSearch()
STRING szIISKey, szNumName, szNumValue;
NUMBER nType, nSize, nvType, nvSize;
begin
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
szIISKey = "SYSTEM/CurrentControlSet/Services/W3SVC/Parameters";
if (RegDBGetKeyValueEx(szIISKey,"MajorVersion",nType,szNumValue,nSize) < 0) then
MessageBox("没有安装IIS,安装失败!请安装IIS 5.0以上!",SEVERE);
abort;
else
if (szNumValue <= "5") then
MessageBox("IIS版本不能小于5.0,安装失败!",SEVERE);
abort;
endif;
endif;
end;
STRING szIISKey, szNumName, szNumValue;
NUMBER nType, nSize, nvType, nvSize;
begin
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
szIISKey = "SYSTEM/CurrentControlSet/Services/W3SVC/Parameters";
if (RegDBGetKeyValueEx(szIISKey,"MajorVersion",nType,szNumValue,nSize) < 0) then
MessageBox("没有安装IIS,安装失败!请安装IIS 5.0以上!",SEVERE);
abort;
else
if (szNumValue <= "5") then
MessageBox("IIS版本不能小于5.0,安装失败!",SEVERE);
abort;
endif;
endif;
end;
此脚本主要用于检测系统中安装的Internet Information Services (IIS) 的版本是否满足最低为5.0的要求。如果检测到的IIS版本低于5.0,则会提示安装失败,并建议用户升级至IIS 5.0或更高版本。
2365

被折叠的 条评论
为什么被折叠?



