Private Sub Form_Load()
Dim rs As Recordset
Dim cnn As Connection
Set rs = New Recordset
Set cnn = New Connection
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\user.mdb;Persist Security Info=False"
'cnn.CursorLocation = adUseClient
cnn.Open
rs.Open "Users", cnn
Set DataGrid1.DataSource = rs
End Sub如果有cnn.CursorLocation = adUseClient,就没有问题,如果注释掉呢,就会发生实时错误'7004',行集合不能作为标签。
为什么?
Dim rs As Recordset
Dim cnn As Connection
Set rs = New Recordset
Set cnn = New Connection
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\user.mdb;Persist Security Info=False"
'cnn.CursorLocation = adUseClient
cnn.Open
rs.Open "Users", cnn
Set DataGrid1.DataSource = rs
End Sub如果有cnn.CursorLocation = adUseClient,就没有问题,如果注释掉呢,就会发生实时错误'7004',行集合不能作为标签。
为什么?
解决方案 »
- VB 实现XP风格窗体`简体中文没有问题`繁体版系统实现不了..求解???
- 请问我在VB打包时,出现sscrc.dll和unicows.dll不能打到。我用的是水晶报表v10英文开发版
- 简单问题.请各位高手帮忙!(等待中...)
- 一个很菜的问题
- 十万火急!向达人请教,把图片变成数据流的方法!在线等待!
- 请上海的朋友看一下,这家公司怎么样?
- VB怎么样对 SQL 2000的 Binary 字段进行读写操作?
- 我要对数据库进行操作,看如下代码:
- 怎样可以计算出中英文(全角半角)混排字符串的长度,用于打印时分析一行多少字符。
- 关于isnull()函数
- 怎么让ADO中的Cn.execute支持多级事务处理
- Form1的一个过程中Form2.show 1,还想让Form1原过程继续执行,好像不行
设置游标在客户端