/* written by Jaron ,2002-06-08 */ /* 原出处:江都资讯网论坛 http://www.jiangdu.net/bbs */ /* 转载请注明出处和保留此版权信息 */ /* 欢迎使用SiteManager网站管理系统 http://sitemanager.cnzone.net */
可以通过检测以下两个注册表值来检查是否安装了IIS HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\IISADMIN HKEY_LOCAL_MACHINE \SYSTEM\CurrentControlSet\Services\w3svc\parameters
程序示例: ////////////////////////////////////////////////////////////////////////////// // // FUNCTION: CheckIIS // 示例:检查系统是否安装IIS // 作者:贾 俊 , 江都资讯网 http://www.jiangdu.net ;转载请注明出处 // ////////////////////////////////////////////////////////////////////////////// function CheckIIS() NUMBER nvType, nvSize; STRING svvalue; begin RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE ); if (RegDBKeyExist ("System\\CurrentControlSet\\Services\\IISADMIN" ) = 1) then return (1); else return (0); endif; end; 
|