ado访问数据库简单问题

[bytt]

如何不用建数据源直接数据库(用ADO)??

[wqb]

先建立连接，再打开记录集。例如：
dim Cnn As New ADODB.Connection
dim rs as New ADODB.Recordset
Cnn.Open "driver={SQL Server};server=" & YourServer & ";uid=" & YourUid & ";PWD=" & pwd & ";database=" & YourDB
rs.open"select * from 表1",cnn

[y97523]

新建一"数据工程"

[bytt]

不用数据源,直接访问.dbm文件

[xmao]

两种方法！
'DSN-less Connection
'以SQL Server为例
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "driver={SQL Server};server=server_name;uid=user_name;pwd=pwd;database=pubs"

'OLE DB Connection
'以SQL Server为例
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "provider=sqloledb;data source=server_name;initial catalog=pubs;user id=user_name;password=pwd;"

http://www.chaxiu.com/club/replan.php?boardid=15&planid=664

[bytt]

连接assess数据库时,没有数据源直接联*.mdb文件的方法

[bytt]

谢谢!xmao(小猫)

[xmao]

共同进步啊。。呵呵

[win911]

Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim strsql As String
Dim strcnn As String
'还有这个也可以
'cnnstr = "Microsoft.Jet.OLEDB.4.0;Data Source=C:\phone\phone.mdb;Persist Security Info=False"
strcnn = "DRIVER={Microsoft Access Driver (*.mdb)};" & _
"DBQ=c:\phone\phone.mdb;"
cnn.Open strcnn
strsql = "select 字段 from 表名"
rst.Open strsql, cnn, adOpenDynamic, adLockBatchOptimistic

[Jerric]

直接使用Recordset:
dim rsTable as new adodb.recordset
stTable.open "DSN=MySampleDSN",3,1

it's ok.

[mmzxg]

up

[bytt]

http://www.greatmidnight.com/cgi-bin/bbs/bbs.cgi?menu=show&id=MKSSu&slttitle=20010304111353&see=18