assess数据库连接问题
我想用pb连接assess数据库，不用ODBC的连接方式，请问怎么连接？
[解决办法]
肿么这么多的问题，直接粘的，你看看吧

OLE DB 方式
//********************************************************
//*** OLE DB Provider for ODBC Databases
//********************************************************

//访问MS Access数据库
OLEObject adoConnection
adoConnection = CREATE OLEObject
adoConnection.ConnectToNewObject("ADODB.Connection")
String strConn
//Set oConn=Server.CreateObject("ADODB.Connection")
StrConn="Provider=MSDASQL;Driver={Microsoft Access Driver (*.mdb)};Dbq=E:\db1.mdb;Uid='';Pwd='';"
adoConnection.open(strConn)
//oConn.Open strConn
OLEObject adoRecordset
adoRecordset = CREATE OLEObject
adoRecordset.ConnectToNewObject("ADODB.Recordset")
adoRecordset.Open("SELECT * FROM city",adoConnection)
String temp
temp=adoRecordset.getString()
MessageBox("Test:",temp)

(一) 使用OLE DB方式
********************************************************
*** 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

********************************************************
*** 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
(二) 使用ODBC方式
********************************************************
*** ODBC Driver for Access
********************************************************
Dim oConn,strConn
Set oConn=Server.CreateObject("ADODB.Connection")
StrConn= "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq="&Server.MapPath("Testdb.mdb"); & _
"Uid=AdminAccount;" & _
"Pwd=Password;"
oConn.Open strConn