datagrid1.datasourse属性不能于rs对象作绑定的,除非跟Adodc控件。
建议添加一个Adodc控件,ADODC连接数据库在ADODC的属性窗口里就可以自动设置,代码就可以改成。
dim cn as new adodb.connection
dim rs as new adodb.recordset
cn.open........
rs.open "select * from table",cn,,
Adodc1.RecordSource="select * from table"
Set datagrid1.datasourse=Adodc1
[此贴子已经被作者于2005-12-6 23:20:31编辑过]