asp 验证组件是否安装
来源:网络 作者:佚名 点击:
次时间:2017-08-23 21:47
[摘要] 指引教程为您提供asp 验证组件是否安装等资源，欢迎您收藏本站，我们将为您提供最新的asp 验证组件是否安装资源
|
<script>ec(2);</script> 作用：验证组件是否安装
'参数：组件名称
Public Function IsObjInstall(obj)
Dim IsObj
On Error Resume Next
Set IsObj = Server.CreateObject(obj)
if Err = 0 then
Rem IsObjInstall = "√"
IsObjInstall = "True"
else
Rem IsObjInstall = "<span style=""color:#FF0000"">×</span>"
IsObjInstall = "Flase"
end If
Set IsObj = Nothing
If Err <> 0 Then Err.Clear
End Function
|
------分隔线----------------------------
