通过ADO连接各种数据库的字符串翠集（二）（完）

<摘自 tigerwen01 的 Blog >

通过ADO连接各种数据库的字符串翠集

海南省信息服务中心  温大文

 

 

（ (接上篇）

二 二、接下来讲使用OLE DB来连接数据库的例子。

1）  OLE DB Provider for Active Directory Service

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=ADSDSOObject;" & _

　　　　　　　　　 "User Id=myUsername;" & _

　　　　　　　　　 "Password=myPassword;"

oConn.Open strConn

%>

2) OLE DB Provider for DB2

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=             "Provider=DB2OLEDB;" &

　　　　　　　　　　 "Network Transport Library=TCPIP;" &

　　　　　　　　　　 "Network Address=MyServer;" & _

　　　　　　　　　　 "Package Collection=MyPackage;" &

　　　　　　　　　　 "Host CCSID=1142"

　　　　　　　　　　 "Initial Catalog=MyDB;" &

　　　　　　　　　　 "User ID=MyUsername;" & _

"Password=MyPassword;"

       oConn.Open strConn

%>

3) OLE DB Provider for Index Server

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=msidxs;" & _

　　　　　　　　　 "Data source=MyCatalog;"

oConn.Open strConn

%>

4) OLE DB Provider for Internet Publishing

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

 StrConn=  "Provider=MSDAIPP.DSO;" & _

　　　　　 "Data Source=http://mywebsite/myDir;" & _

　　　　　 "User Id=myUsername;" & _

　　　　　 "Password=myPassword;"

oConn.Open strConn

%>

5) OLE DB Provider for Microsoft Jet

●  标准的也是常用的访问方式。

        <%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=Microsoft.Jet.OLEDB.4.0;" & _

　　　　　　　　　 "Data Source=c:/somepath/myDb.mdb;" & _

　　　　　　　　　 "User Id=admin;" & _

　　　　　　　　　 "Password=;"

oConn.Open strConn

%>

●      假如是一个工作组的系统数据库，那么连接字符串如下。

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=Microsoft.Jet.OLEDB.4.0;" & _

　　　　　　　　　 "Data Source=c:/somepath/mydb.mdb;" & _

　　　　　　　　　 "Jet OLEDB:System Database=MySystem.mdw;", _

　　　　　　　　　 "admin", ""

oConn.Open strConn

%>

注意：在使用4.0 OLE DB Provider 提供者的驱动程序时，要记得把MDB和MDW转换成the 4.0 database格式。

●      如果MDB是设置密码的话，那么使用如下连接字符串。

oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _

　　　　　　　　　 "Data Source=c:/somepath/mydb.mdb;" & _

　　　　　　　　　 "Jet OLEDB:Database Password=MyDbPassword;", _

　　　　　　　　　 "admin", ""

●      如果MDB是位于网络中并且是共享的话，那么使用如下连接字符串。

oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _

　　　　　 "Data Source=//myServer/myShare/myPath/myDb.mdb;

●      如果要想使用专有的方式来访问数据库，那么使用如下连接字符串。

oConn.Mode = adModeShareExclusive

oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _

　　　　　　　　　 "Data Source=c:/somepath/myDb.mdb;" & _

　　　　　　　　　 "User Id=admin;Password=;"

6）使用OLE DB Provider for Microsoft Jet来访问Excel电子数据表。

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=Microsoft.Jet.OLEDB.4.0;" & _

　　　　　　　　　 "Data Source=c:/somepath/myExcelSpreadsheet.xls;" & _

　　　　　　　　　 "Extended Properties=""Excel 8.0;HDR=Yes;"";"

oConn.Open strConn

%>

说明：这里的HDR=Yes的意思是，提供者访问Excel电子数据表时没有把第一排的数据加入到数据集中；而当HDR=No时的意思是提供者访问Excel电子数据表时动作恰好跟上面所述相反。

7）OLE DB Provider for ODBC Databases

●      访问MS Access数据库

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=MSDASQL;" & _

　　　　　　　　　 "Driver={Microsoft Access Driver (*.mdb)};" & _

　　　　　　　　　 "Dbq=c:/somepath/mydb.mdb;" & _

　　　　　　　　　 "Uid=myUsername;" & _

　　　　　　　　　 "Pwd=myPassword;"

oConn.Open strConn

%>

●      访问MS SQL Server 数据库

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=MSDASQL;" & _

　　　　　　　　　 "Driver={SQL Server};" & _

　　　　　　　　　 "Server=myServerName;" & _

　　　　　　　　　 "Database=myDatabaseName;" & _

　　　　　　　　　 "Uid=myUsername;" & _

　　　　　　　　　 "Pwd=myPassword;"

oConn.Open strConn

%>

8) OLE DB Provider for Oracle (from Microsoft)

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=msdaora;" & _

　　　　　　　　　 "Data Source=MyOracleDB;" & _

　　　　　　　　　 "User Id=myUsername;" & _

　　　　　　　　　 "Password=myPassword;"

oConn.Open strConn

%>

9) OLE DB Provider for Oracle (from Oracle)

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=OraOLEDB.Oracle;" & _

　　　　　　　　　 "Data Source=MyOracleDB;" & _

　　　　　　　　　 "User Id=myUsername;" & _

　　　　　　　　　 "Password=myPassword;"

oConn.Open strConn

%>

10) OLE DB Provider for SQL Server

●  标准连接方式

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=sqloledb;" & _

　　　　　　　　　 "Data Source=myServerName;" & _

　　　　　　　　　 "Initial Catalog=myDatabaseName;" & _

　　　　　　　　　 "User Id=myUsername;" & _

　　　　　　　　　 "Password=myPassword;"

oConn.Open strConn

%>

●      通过机器的IP地址访问

<%

Dim oConn,strConn

Set oConn=Server.CreateObject(“ADODB.Connection”)

StrConn=           "Provider=sqloledb;" & _

　　　　　　　　　 "Data Source=xxx.xxx.xxx.xxx,1433;" & _

　　　　　　　　　 "Network Library=DBMSSOCN;" & _

　　　　　　　　　 "Initial Catalog=myDatabaseName;" & _

　　　　　　　　　 "User ID=myUsername;" & _

　　　　　　　　　 "Password=myPassword;"

oConn.Open strConn

%>

说明：IP：xxx.xxx.xxx.xxx

      SQLServer默认端口：1433

附录1：

ADO数据对象及其功能简介

ADO数据对象

功能

.Connection

代表与一个数据源的唯一对话

.Command

用Command对象，你可以执行带参数的存储过程，SQL查询，SQL语句。你可以使用Command对象接收Recordset对象。

.RecordSet

用于代表一数据库表。

.Error

该对象包含所有的错误和警告信息。该对象只具有属性值。

.Field

Field对象代表在数据集中的某一列。

.Parameter

Parameter对象用于提供要参数的SQL查询或存储过程所需的参数，或者从存储过程中返回值。

.Property

代表数据提供者的具体属性。

 

（全文完）

作者Blog：http://blog.csdn.net/tigerwen01/

 

---