/*说明:
查询并显示在列表里
查询成功了,在监视器看到recordset里有数值,
但绑定datagrid的语句过后,发现dataSource里“无变量”
控件也没显示任何东西搞个绑定都这么多麻烦,晕啊
*/
Set AdoStuRs = New ADODB.Recordset
AdoStuRs.CursorLocation = adUseClient'QueryExt是我自己定义的执行sql语句的函数
Set AdoStuRs = QueryExt("SELECT [StuNum],[Sn],[Contact],[Campus] FROM [student]")
AdoStuRs.MoveFirst
'绑定到datagrid控件
Set DataGridStuList.DataSource = AdoStuRs
DataGridStuList.ReBind
DataGridStuList.Refresh
//**********
之前都有几个人问过类似的问题,但我用了大家给的建议都没能解决问题:(
顺便问问,、。。
adOpenKeyset, adLockOptimistic
这些到底是什么意思啊?
查询并显示在列表里
查询成功了,在监视器看到recordset里有数值,
但绑定datagrid的语句过后,发现dataSource里“无变量”
控件也没显示任何东西搞个绑定都这么多麻烦,晕啊
*/
Set AdoStuRs = New ADODB.Recordset
AdoStuRs.CursorLocation = adUseClient'QueryExt是我自己定义的执行sql语句的函数
Set AdoStuRs = QueryExt("SELECT [StuNum],[Sn],[Contact],[Campus] FROM [student]")
AdoStuRs.MoveFirst
'绑定到datagrid控件
Set DataGridStuList.DataSource = AdoStuRs
DataGridStuList.ReBind
DataGridStuList.Refresh
//**********
之前都有几个人问过类似的问题,但我用了大家给的建议都没能解决问题:(
顺便问问,、。。
adOpenKeyset, adLockOptimistic
这些到底是什么意思啊?
Set DataGridStuList.DataSource = AdoStuRs.clone
Set DataGridStuList.DataSource = AdoStuRs
DataGridStuList.Refresh你这样看看