繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp代码实现检测组件是否安装的函数
- ASP
- asp使用activex组件实例一
- ASP中检查没有数据提交的页面Ⅰ
- ASP中检查没有数据提交的页面Ⅱ
- 为ASP开发者介绍ColdFusion
- W3 Jmail 简要介绍
- W3 Jmail 参考说明
- W3 Jmail 使用范例
- ASP教程：堵住ASP漏洞
- 利 用 ASP 开 发 网 络 聊 天 室
- MySQL数据库基础教程
- ASP和SQLServer时间处理方法Ⅰ
- 如何利用ASP实现邮箱访问
- SQL语言快速入门之一
- SQL语言快速入门之二
- SQL语言快速入门之三（一）
- 用纯ＡＳＰ代码实现图片上传并存入数据库中
- ASP进阶教程Ⅹ：留言簿自动发E-Mail
- 单元测试和事先测试开发(2)
- .NET的事务控制.
- .NET 的数据访问应用程序块（Data Access Application Block）
ASP 中的 asp代码实现检测组件是否安装的函数
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 230 ::
收藏到网摘: n/a
<%
'******************************
'函数：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
%>
评论 (0) All
