如何获得ADO的连接信息？

来源：asp之家时间：2009-11-23 20:33:00　

在ASP中，如何获得ADO的连接信息？

具体方法见下列代码：

<％
Sub ConnectionInfo(strcnn)
 Dim cnn
 Set cnn = Server.CreateObject("ADODB.Connection")
 cnn.Open strcnn
 Response.Write "ADO Version: " &_
 cnn.Version & " " & vbCrlf
 Response.Write "DBMS Name: " &_
 cnn.Properties("DBMS Name") & " " & vbCrlf
 Response.Write "OLE DB Version: " &_
 cnn.Properties("OLE DB Version") & " " & vbCrlf
 Response.Write "Provider Name: " &_
 cnn.Properties("Provider Name") & " " & vbCrlf
 Response.Write "Provider Version: " &_
 cnn.Properties("Provider Version") & " " & vbCrlf
 Response.Write "Provider Friendly Name: " &_
 cnn.Properties("Provider Friendly Name") & " " & vbCrlf
 If Instr(LCase(cnn.Properties("Provider Name")),"oledb") = 0 Then
 Response.Write "Driver Name: " &_
 cnn.Properties("Driver Name") & " " & vbCrlf
 Response.Write "Driver Version: " &_
 cnn.Properties("Driver Version") & " " & vbCrlf
 Response.Write "Driver ODBC Version: " &_
 cnn.Properties("Driver ODBC Version") & " " & vbCrlf
 End If
 cnn.Close
 Set cnn = Nothing
End Sub
％>
<HTML>
<head>
<title>asp教程之ADO连接信息</title>
</head>
<BODY>
<％
Dim strcnn
strcnn = "provider=sqloledb;data source=.;initial catalog=pubs;user id=sa;password=;"
Call ConnectionInfo(strcnn)
％>
</BODY>
</HTML>

标签：ado,连接,asp

投稿

如何获得ADO的连接信息？

猜你喜欢

MySql索引和事务定义到使用全面涵盖

Python如何自动获取目标网站最新通知

在Python中使用异步Socket编程性能测试

站长必须要了解的九条平面设计常识

Python简单实现子网掩码转换的方法

分享Python获取本机IP地址的几种方法

利用matplotlib+numpy绘制多种绘图的方法实例

Django数据库连接丢失问题的解决方法

python smtplib发送带附件邮件小程序

django admin search_fields placeholder 管理后台添加搜索框提示文字

FrontPage 2002应用技巧四则

10张动图学会python循环与递归问题

mysql如何查询日期与时间

go语言开发中如何优雅得关闭协程方法

python数据挖掘使用Evidently创建机器学习模型仪表板

python中reload重载实例用法

从Oracle 表格行列转置说起第1/2页

pytorch实现线性回归以及多元回归

详解Python的基础语法和变量操作

十行Python3代码实现去除pdf文件水印