新后初识ADO,请帮助

Question

Dim cn As ADODB.Connection
Dim rs As ADODB.RecordsetPrivate Sub Command1_Click()Set cn = New ADODB.Connection
Set rs = New ADODB.Recordsetcn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\ProgramFiles\Microsoft Visual Studio\VB98\Biblio.mdb;Persist Security Info=False"
rs.Open ""select * from tablename where A AND B", cn, adOpenDynamic, adLockOptimisticSet DataGrid1.DataSource = rs

Answer 1

cool 能不能接上sql查询语句呢~我要加分了!

Answer 2

新问题~如何控制数据源呢?用ODBC做一个绑定到ADOBC1?但是发步后我的数据库文件放哪儿呢?程序自动会找到么?

Answer 3

设置ado控件的connectionstring到你所要连接的数据库。
设置ado控件的recordsource 为"select * from tblname where a and b" 
datagrid 的 datasource 为adodc1 即可

Answer 4

对啊，直接设置ADODC的CONNECTION属性，然后再设置其RECORDSOURCE属性，这里就可以直接使用SQL语句设定了，最后再通过DATAGRID的DATASOURCE和ADODC相连即可。