7491
社区成员
set data1.recordset=rs '这句出错
rs是ado.recordset对象
data1是data控件，data1控件我需要用于MSFlexGrid控件
data1.recordset对象需要的recordset是DAO的！
所以:
set data1.recordset=rs '这句出错
难道data1.recordset的记录集就一定要用DAO的？不能使用ADO的么？ 不懂DAO :(
data1是data控件，data1控件我需要用于MSFlexGrid控件
data1.recordset对象需要的recordset是DAO的！
所以:
set data1.recordset=rs '这句出错
难道data1.recordset的记录集就一定要用DAO的？不能使用ADO的么？ 不懂DAO :(
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
lalalulu 2003-05-20
set data1.datasource=rs
Equn 2003-05-20
up
Equn 2003-05-16
Private Sub Form_load()
Dim rs As New Recordset
Dim con As New Connection
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\dealmore\data\data.mdb"
rs.Open "select * from products", con, 1, 1
Set MSFlexGrid1.DataSource = rs '执行到这句时提示出错:对象变量或with块变量未设置
End Sub
MSFlexGrid控件只能和Adodc控件连接，不能直接连接Ado记录集？
Dim rs As New Recordset
Dim con As New Connection
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\dealmore\data\data.mdb"
rs.Open "select * from products", con, 1, 1
Set MSFlexGrid1.DataSource = rs '执行到这句时提示出错:对象变量或with块变量未设置
End Sub
MSFlexGrid控件只能和Adodc控件连接，不能直接连接Ado记录集？
cool_man 2003-05-16
DATA是DAO的，你的rs是ADO的所以要用ADODC这个控件才行
lxcc 2003-05-16
data本身不支持与ado绑定
直接
set MSFlexGrid1.datasource=rs
直接
set MSFlexGrid1.datasource=rs
阿晨0 2003-05-16
首先确定你的rs已经能打开，能使用
然后就可以直接这样使用了
rs.open
set MSFlexGrid1.Recordset=rs
Recordset1.refresh
这样就可以了，当你是用了ADO的表，就不再需要Data的连接了
然后就可以直接这样使用了
rs.open
set MSFlexGrid1.Recordset=rs
Recordset1.refresh
这样就可以了，当你是用了ADO的表，就不再需要Data的连接了
xinjiana 2003-05-16
'定义命令和记录集
Dim cmd As Command
Dim rs As Recordset
'设置命令和记录集的链接对象
'de.cnn为ado的数据源
Set cmd = New Command
cmd.ActiveConnection = de.cnn
cmd.CommandText = "select * from tabuser"
Set rs = cmd.Execute
Set Data1.Recordset = rs
'释放
Set rs = Nothing
应该还有更好的方法的
Dim cmd As Command
Dim rs As Recordset
'设置命令和记录集的链接对象
'de.cnn为ado的数据源
Set cmd = New Command
cmd.ActiveConnection = de.cnn
cmd.CommandText = "select * from tabuser"
Set rs = cmd.Execute
Set Data1.Recordset = rs
'释放
Set rs = Nothing
应该还有更好的方法的
道素 2003-05-16
rs这个东西你使用前一定要new
data1.recordset的记录集当然可以是ado，你最好把错误提示写出来，这样才好找原因
___
( ">
)(
// ) CH21ST@HOTMAIL.COM
--//""--－－－－－－－－－－
-/------
data1.recordset的记录集当然可以是ado，你最好把错误提示写出来，这样才好找原因
___
( ">
)(
// ) CH21ST@HOTMAIL.COM
--//""--－－－－－－－－－－
-/------
set DataGrid1.DataSource = rs DataGrid1为什么时空的？ Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient txtSQL = "select * from 采样点基本情况" Set rs = ExecuteSQL(txtSQL, Msgtext)' 这个函数得到一个记录集， MsgBox rs.RecordCount...
vb6: dim rs As New ADODB.Recordset 用户定义类型未定义 你没有启用ADODB的引用，或者加载ADODC控件， 在“工程|引用”中添加“Microsoft ActiveX Data Object [版本号,比如2.8等] Library”就可以了[用户定义类型未定义]
ADODB.Recordset 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 ADODB.Recordset 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 下面是代码： name=request("text2") if name response.write "text2不能为空" response.end end...
VB6.0 ADODB.Recordset 对象已关闭问题 VB 6.0 下经常用到 ADODB.Record ，用于获取查询结果（select查询、存储过程返回的查询结果集 等） 其中，select查询一般不会有什么问题，但是 返回存储...procedure-- sp_rpt1 中有如下语句： CREATE TABLE ##tm...
"if not rs.eof and not rs.bof then"怎么理解?见asp实例 谁能详细解释asp中"if not rs.eof and not rs.bof then"怎么理解? 2007-06-10 21:11zhbxj2002 | 分类：其他编程语言 | 浏览4349次 谁能详细解释asp中"if not rs.eof and not rs.bof then"怎么理解? ...
asp rs记录集recordset常用操作代码 详细 几乎每一个ASP数据库程序都要用到recordset，关于recordset的很多用法您都知道吗？下面介绍了一些经常用到的ASP RS记录集操作，包括添加、更新、修改、删除数据库内容等，并对一些关键的要点进行说明，对ASP初学者...
如何解决取ADO的Recordset对象的RecordCount属性总是-1问题 1.如何解决取ADO的Recordset对象的RecordCount属性总是-1问题？ 最近在用asp做网页后台时,遇到了一个烦人的问题,RecordSet对象的RecordCount和PageCount均为-1.不能直接获取RecordCount属性,我就想了其他的笨办法...
[VBA]读取文件常用的方法(ADODB.recordSet|ADODB.stream)(大文件读取&指定encode) '#####serach big file (ADODB.Recordset) →it is fast##### Sub searchLineFromText() Dim CN As ADODB.Connection... Dim RS As ADODB.Recordset Dim rsList As Collection Dim tempStr As String
Recordset.asp % Response.Buffer=true Dim conn Set conn=Server.CreateObject("ADODB.Connection") conn.Open "Provider=SQLOleDb.1;Data Source=(local);User ID=sa;Password=;Initial Catalog=Pubs" Di...
excel mysql访问数据库 recordset,Excel VBA：写入mysql数据库 解决方案 You can connect to MySQL with a connection string and ADO: ''http://support.microsoft.com/kb/246335 Set cn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") strCon ...
ADO Recordset 对象 实例 GetRows 本例演示如何使用 GetRows 方法。 Recordset 对象 ADO Recordset 对象用于容纳一个来自数据库表的记录集。一个 Recordset 对象由记录和列（字段）...set objRecordset=Server.CreateObject("ADODB...
rs.absolute(),rs.isAfterLast(),rs.next(),rs.relative()简单解释 rs.absolute(),rs.isAfterLast(),rs.next(),rs.relative()简单解释 转载▼ 转载自新浪博客：半夜路人的博客 rs.absolute(...)允许你指定结果集的绝对位置, 如果没有它，假如你要取第1000条记录的数据，就...
1.引用 Microsoft Excel 12.0 object library 和 ActiceX Data Objects 2.8 library. m = RS.Fields(“A”).Value ‘取记录集中某一个特定的值 RS.Close Set RS = Nothing Dim XlsAPP As Excel.Application Dim XlsBook As Excel.Workbook Dim XlsSheet As Excel.Worksheet Dim New...
ADO的RECORDSET的RECORDCOUNT属性总是为-1 ADO的RECORDSET的RECORDCOUNT属性总是为-1编号：QA002032 建立日期：1999年11月14日最后修改日期：2004年1月2日所属类别：Visual Basic - 数据库 操作系统: nt 编程工具: vb6,sql server 问题: 请问如何判断ADO的...
New ADODB.Connection ADOX.Catalog 提示user-defined type not defined 因为你未在工程中添加对ADO对象引用 的原因， project->references-> Microsoft ADO Ext ....gt; ...Microsoft ActiveX Data Objects 2.x Library，将其勾选上即可。...Dim DataConnection As ADODB....
常用的一些javascript小技巧(收藏http://www.car371.com/article.asp?id=13) 1.用正则表达式限制只能输入全角字符： onkeyup="value=value.replace(/[^\uFF00-\uFFFF]/g,'')" onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\uFF00-\uFFFF]/g,''))" ...
Dim objRs as new RecordSet和Dim objRs as RecordSet的比较 敲实例4遇到问题的思考，多一个new大有学问。 在内存中分配空间的时间和实例化的时间不同： 对于Dim objRs as new RecordSet，当第一次使用objRs的时候，才在内存中分配空间和实例化。...当使用Set o
【郭林专刊】多个js技巧代码 . 1.文本框焦点问题 onBlur:当失去输入焦点后产生该事件 onFocus:当输入获得焦点后，产生该文件 Onchange:当文字值改变时，产生该事件 Onselect:当文字加亮后，产生该文件 (value=='') {value='mm'}">点击时...
