教程集 www.jiaochengji.com
教程集 >  脚本编程  >  Asp.net  >  正文 ASP判断dll文件是否已经注册的简单函数

ASP判断dll文件是否已经注册的简单函数

发布时间:2016-09-24   编辑:jiaochengji.com
教程集为您提供ASP判断dll文件是否已经注册的简单函数等资源,欢迎您收藏本站,我们将为您提供最新的ASP判断dll文件是否已经注册的简单函数资源
asp判断服务器是否安装了某个组件,也就是是否安装了某个dll文件,判断某个组件是否在服务器注册了,asp组件很多,它的判断可以减少很多asp错误,

主要是用下面的函数:

<table width="620" align="center" border="0" cellpadding="1" cellspacing="1" style="background:#FB7"> <tr> <td width="464" height="27" bgcolor="#FFE7CE"> 代码如下</td> <td width="109" align="center" bgcolor="#FFE7CE" style="cursor:pointer;" onclick="doCopy('copy6079')">复制代码</td> </tr> <tr> <td height="auto" colspan="2" valign="top" bgcolor="#FFFFFF" style="padding:10px;" class="copyclass" id=copy6079><%
'功能:检查是否存在系统组件或组件是否安装成功
'参数:组件名
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
'获取系统组件的版本号
Function getver(Classstr)
     On Error Resume Next
     getver=""
     Err = 0
     Dim xTestObj
     Set xTestObj = Server.CreateObject(Classstr)
     If 0 = Err Then getver=xtestobj.version
     Set xTestObj = Nothing
     Err = 0
End Function
%>

 
调用方法如下:

<table width="620" align="center" border="0" cellpadding="1" cellspacing="1" style="background:#FB7"> <tr> <td width="464" height="27" bgcolor="#FFE7CE"> 代码如下</td> <td width="109" align="center" bgcolor="#FFE7CE" style="cursor:pointer;" onclick="doCopy('copy7360')">复制代码</td> </tr> <tr> <td height="auto" colspan="2" valign="top" bgcolor="#FFFFFF" style="padding:10px;" class="copyclass" id=copy7360>

<%
if IsObjInstalled("fso.file") =True then
     response.write("已经安装")&getver("fso.file")
end if
%>

您可能感兴趣的文章:
ASP判断dll文件是否已经注册的简单函数
判断用户是否注册
file_exists与is_file、is_dir的区别
php怎么开启ssl?开启ssl的方法
ASP判断图片的格式
php file_exists is_file与is_dir函数的区别分析
如何实现VB和VC的联合调试
c#判断数据库服务器是否启动
Windows下解决php_curl扩展模块无法加载的处理方法
python27.dll错误代码126怎么解决

[关闭]
~ ~