UC知道记录集中把数据导入datagrid1是没有数据显示 ？？
来源：百度知道 编辑：UC知道 时间：2024/06/01 13:32:00
。。。。。
connection的对象连接显示成功！！
。。。。。。
Dim rr As New ADODB.Recordset
Private Sub Command1_Click()
Dim strsql As String
user = txtuser
pwd = txtpwd
strsql = "select * from m123 where name='" & user & "'and id='" & pwd & "'"
rr.Open strsql, conn, adOpenStatic, adLockReadOnly
rr.MoveFirst
(rr.CursorLocation=adUseClient ) 如果我加了这句 就报错 报错是 3705 对象打开是时 不允许操作！！
Set DataGrid1.DataSource = rr
DataGrid1.Refresh
End Sub
结果是控件 datagrid1没有数据显示 但我的sql语句是没有问题的 因为我用recordcount试过 是有数据的
我用的是 vb6.0 sql server 2000
connection的对象连接显示成功！！
。。。。。。
Dim rr As New ADODB.Recordset
Private Sub Command1_Click()
Dim strsql As String
user = txtuser
pwd = txtpwd
strsql = "select * from m123 where name='" & user & "'and id='" & pwd & "'"
rr.Open strsql, conn, adOpenStatic, adLockReadOnly
rr.MoveFirst
(rr.CursorLocation=adUseClient ) 如果我加了这句 就报错 报错是 3705 对象打开是时 不允许操作！！
Set DataGrid1.DataSource = rr
DataGrid1.Refresh
End Sub
结果是控件 datagrid1没有数据显示 但我的sql语句是没有问题的 因为我用recordcount试过 是有数据的
我用的是 vb6.0 sql server 2000
这个是两个问题嘛。
rr.CursorLocation是只读的嘛。
你又不是判断语句，直接赋值当然不行。
绑定的事
还是觉得你的SQL有问题，你可以在绑定时下个断点来查看你的SQL，并在数据库上单独试验一下。