当前位置: 移动技术网 > IT编程>开发语言>Asp > asp代码实现检测组件是否安装的函数

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

2017年12月12日  | 移动技术网IT编程  | 我要评论
<%
'******************************
'函数: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
%>

如对本文有疑问, 点击进行留言回复!!

相关文章:

验证码:
移动技术网