检测ASP组件安装的函数代码,asp代码实现检测组件是否安装的函数

检测ASP组件安装的函数代码,asp代码实现检测组件是否安装的函数

<%
'******************************
'函数：IsObjInstalled(strClassString)
'参数：strClassString,组件对象名
'作者：阿里西西
'日期：2007/7/13
'描述：检测组件是否安装
'示例：<%=IsObjInstalled(strClassString)%>
'******************************
Function IsObjInstalled(strClassString)
    On Error Resume Next
    IsObjInstalled = False
    'Err = 0
    Dim xTestObj
    Set xTestObj = Server.CreateObject(strClassString)
    If Err<>-2147221005 Then IsObjInstalled = True Else IsObjInstalled = False End IF
    Set xTestObj = Nothing
    'rr = 0
End Function
%>
检测ASP组件安装的函数代码,asp代码实现检测组件是否安装的函数相关文章内容教程说明。
文章TAG：asp代码  检测组件  检测函数