asp 检测服务器所安装组件

'***************************************************
'函数名：IsObjInstalled
'作  用：检查组件是否已经安装
'参  数：strClassString ----组件名
'返回值：True  ----已经安装
'       False ----没有安装
'***************************************************
Function IsObjInstalled(strClassString)
 On Error Resume Next
 IsObjInstalled = False
 Err = 0
 Dim xTestObj
 Set xTestObj = Server.CreateObject(strClassString)
 If 0 = Err Then IsObjInstalled = True
 Set xTestObj = Nothing
 Err = 0
End Function

您可能感兴趣的文章：
asp 检测服务器所安装组件
asp 检测服务器是否安装组件
如何在电脑上运行asp程序
ASP 全新接触（1）
ASP 3.0高级编程（二十九）
ActiveX 组件
Windows 2003下安装VS2008时.NetFramework3.5组件安装失败的解决方法
FrontPage服务器扩展
突破性的ASP 技术
让IIS支持PHP