判断服务器是否安装了某种asp组件,比较常用的代码如下:
复制代码 代码如下:
%
'功能:检查是否存在系统组件或组件是否安装成功
'参数:组件名
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
%>
调用方法如:
复制代码 代码如下:
%
if IsObjInstalled("fso.file") =True then
response.write("已经安装")getver("fso.file")
end if
%>
您可能感兴趣的文章:- asp.net“服务器应用程序不可用” 解决方法
- js获取.aspx页面里面的服务器控件和.ascx中的服务器控件值
- aspx 服务器架设问题解决
- Asp.net的服务器推技术 (Server Push)
- Javascript 直接调用服务器C#代码 ASP.NET Ajax实例
- jquery获取ASP.NET服务器端控件dropdownlist和radiobuttonlist生成客户端HTML标签后的value和text值
- IIS服务器中 ASP.NET State Service 开启后 Session 仍容易丢失的问题终极解决办法
- asp在服务器把 XML 转换为 XHTML的实现代码
- win2008 r2 服务器环境配置(FTP/ASP/ASP.Net/PHP)
- iis8.5显示ASP的详细错误信息500 内部服务器错误解决方法
- 服务器安全狗导致ASP.NET网站运行出错的一个案例
- 推荐4款傻瓜型的ASP服务器软件(asp运行环境一键搭建工具)
- asp将本地的文件上传到服务器
- asp服务器如何搭建