当我的数据源设置为:“FileDSN=aaa.dsn;UID=sa;PWD=”时,我对datagrid1的查询就没有问题。
但是我把数据连接设置为:
“PROVIDER=SQLOLEDB;DATA SOURCE=(local);UID=sa;PWD=;DATABASE=aaa”
的时候就会出错。出错在这条语句:Set dg5.DataSource = mrc
出错显示信息:实时错误 ‘7004’,行集合不能作为标签。谁知道怎么解决?
还有vb中我的数据连接不想通过数据源(dsn)设置,我想直接通过provider设置,请问该用什么语句?
但是我把数据连接设置为:
“PROVIDER=SQLOLEDB;DATA SOURCE=(local);UID=sa;PWD=;DATABASE=aaa”
的时候就会出错。出错在这条语句:Set dg5.DataSource = mrc
出错显示信息:实时错误 ‘7004’,行集合不能作为标签。谁知道怎么解决?
还有vb中我的数据连接不想通过数据源(dsn)设置,我想直接通过provider设置,请问该用什么语句?
解决方案 »
- 急问个关于mscomm控件串口通讯的问题
- ocx控件使用的问题
- 如何使图片自动适合图片框大小!
- 哪里有背景透明的VB按钮源代码(SSCOMMAND有BUG除外)?急。
- 用VB+Sql server 做一个小的基于Internet的CRM,如何提高软件的运行速度呢?
- 散盡分!
- 怎样知道光驱内是否有光盘, 像超级解霸伺服器一样?
- 关于DataReport控件的问题,急!
- 急!高人帮忙啊!VB中控件的属性问题!
- 各位大虾,如何实现资源管理器功能?对文件进行全部控制?(代码!!!:-))
- ActiveX组件自动升级问题:如何编程找出某个ActiveX对象所对应的文件(dll,ocx,exe)的路径?
- 急急急急急!!! 怎么连接SQL数据库?在线等!!!!!
给你个例子.
Public Conn_sys As ADODB.Connection
Public Rstmp As ADODB.RecordsetPublic Sub Conn_sysDB()
Set Conn_sys = New ADODB.Connection
Set Rstmp = New ADODB.Recordset
Dim s As String
s = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\BMsys.MDB;Persist Security Info=false;Jet OLEDB:Database Password="
Conn_sys.ConnectionString = s
Conn_sys.ConnectionTimeout = 30
Conn_sys.CursorLocation = adUseClient
Conn_sys.Open
End Sub
conn_mdb然后,比开其中一个表.
set rstmp=conn_mdb.excute("select * from TABLE(表名)")再set 你的表格数据源
Set dg5.DataSource = rstmp
少了这么一句:Conn_sys.CursorLocation = adUseClient结贴