ado访问数据库简单问题

Question

先建立连接，再打开记录集。例如：
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

Answer 1

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

Answer 2

两种方法！
'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

Answer 3

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

Answer 4

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

Answer 5

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

Answer 6

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