1188
社区成员
怎样把Command返回的记录集给MSHFlexGrid
现有一个存储过程，如：
CREATE proc temp
@bookid varchar(3)
as
select *
from booksinfo
where bookid=@bookid
GO
用Command调用后怎么把记录集给MSHFlexGrid？
如果返回的是两个记录集又该怎么把它都显示出来，哪怕是用两个MSHFlexGrid也行。
CREATE proc temp
@bookid varchar(3)
as
select *
from booksinfo
where bookid=@bookid
GO
用Command调用后怎么把记录集给MSHFlexGrid？
如果返回的是两个记录集又该怎么把它都显示出来，哪怕是用两个MSHFlexGrid也行。
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
of123 2006-02-23
还是要用记录集的：
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Set rs = mycommand.Execute()
Set MSHFlexGrid1.DataSource = rs
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Set rs = mycommand.Execute()
Set MSHFlexGrid1.DataSource = rs
Rain 2006-02-23
我不要用recordset
我现在就是想知道用Command怎么返回记录集
我现在就是想知道用Command怎么返回记录集
faysky2 2006-02-23
用ADO
dim cn as new adodb.connection,rs as new adodb.recordset
cn.open "连接数据库字符串......"
Set rs = cn.Execute("exec temp 参数", , adCmdStoredProc)
Set MSHFlexGrid1.DataSource = rs
dim cn as new adodb.connection,rs as new adodb.recordset
cn.open "连接数据库字符串......"
Set rs = cn.Execute("exec temp 参数", , adCmdStoredProc)
Set MSHFlexGrid1.DataSource = rs
Rain 2006-02-23
呵呵，到真的项目中肯定是一个记录集一个存储过程啊，而且用Command来返回记录集也很少啊！这是别人出的思考题，我也不知怎么做才问的啊！
faysky2 2006-02-23
如果不想用Union，那你可以再写一个存储过程，来返回一个记录集（需要返回多少个记录集，就写多少个存储过程）
faysky2 2006-02-23
用Union的例子：
CREATE proc temp
@bookid varchar(3)
as
select * from table1 where bookid=@bookid
Union
select * from table2 where ......
GO
CREATE proc temp
@bookid varchar(3)
as
select * from table1 where bookid=@bookid
Union
select * from table2 where ......
GO
faysky2 2006-02-23
两个记录集？不知道怎么做
不过可以修改存储过程，两个查询改为一个查询（用Union联合）
不过可以修改存储过程，两个查询改为一个查询（用Union联合）
Rain 2006-02-23
那要是一个存储过程里有两个记录集返回呢？
第一次机房收费系统之学生查看上机记录 流程图 代码部分 Private Sub Command1_Click() Dim txtSQL As String '用于存放SQL语句 Dim MsgText As String '用于存放返回信息 Dim mrc As ADODB.Recordset '用于存放student记录集 Dim mrc1 As...
vb数据库编程（二）--数据控件 而且有一点重要常识：绑定控件实质上是绑定到记录集上的，不要简单地理解为绑定到数据控件或数据环境的Command命令对象上，这是不准确的，你应当试试在代码中直接将DataSource赋值给一个记录集。（注：对于数据对象...
vb数据库编程（四）--ADO对象 有两种情况，如果命令会返回记录，如Select或干脆就是1个表名等，则要将返回记录(当作记录集)赋予1个Recordset对象，格式为 Set Recordset对象=command对象.Execute() 如果命令不返回记录（如Update,Delete等），则...
ADO.NET相关整理 ，因此，如果该方法执行一个选择查询返回一个记录集时特别要明白。举一个完整的例子如下： 13. Dim cn As ADODB.Connection 14. Dim rst As ADODB.Recordset 15. Private Sub Command2_...
ADO.Net的对象模型 Connection.Command,Parameter,Recordset,Field,Property,Error.此外，还包括四个集合，Fields,Properties,Parameters,Errors.这几个对象的功能如下：Connection对象提供与包含路径，口令和连接选项的数据源的链接；...
基于关系数据库的VB通用查询编程技巧 其中查询功能更是用户经常使用的功能，一个可改变条件的灵活、快捷、准确的查询会给用户带来极大的方便，也给软件本身带来了更大的价值。二、通用查询的设计 1.对象的添加 在VB6.0环境中，建立一个标准的EXE工程，...
vb学习 使用静态变量放置控件: Form1:Label1,Command1 属性设置: cLabel1.Autosize= true代码:Private Sub Command1_Click() Static stflag As Boolean 使用静态变量来保存变量值 If stflag = False Then Label1.Font....
不错VB代码，收藏！！！ 'VarPtr用在包含字符串的变量时,可能返回的指针是临时地址(UNICODE转换的缘故) 'StrPtr还是唯一能直观地告诉你空字符串和null字符串的不同的方法。 '对于null字符串(vbNullString)，StrPtr的返回值为0，而对于空字符...
VB6常用方法汇编 使用静态变量放置控件: Form1:Label1,Command1 属性设置: cLabel1.Autosize= true代码:Private Sub Command1_Click() Static stflag As Boolean 使用静态变量来保存变量值 If stflag = False Then Label1.Font....
VB速查大全(数据库、表格及报表编程) ★ VB错误处理，ado常见错误，VB数据类型等，网上有很多教程是错的，强烈建议看此文 ⊕Command函数可以取本程序运行时的参数，比如命令行运行本程序 ok.exe /s，command返回"/s" ⊕【Format 函数可以用于定义或转换各种格式(如："00000"可以将数值变为前置0的定长字符串，也可以用">"将英文...
VB备忘录（21）ADO概念 键集游标 — 其行为类似动态游标，不同的只是禁止查看其他用户添加的记录，并禁止访问其他用户删除的记录， 其他用户所作的数据更改将依然可见。它始终支持书签，因此允许 Recordset 中各种类型的移动。 ...
VB数据库习题过五关斩六将 数据库编程的种类有很多，vb数据库编程可以说是所有数据库的元老，下面分享一些vb数据库编程的经典习题，是在很多经典书籍中提炼出的，分享给大家。 1试根据题意写出空白处内容 （1）要使绑定控件能通过数据控件...
从 RDO到 ADO 的移植 2001年02月14日 08:21:00 从 RDO到 ADO 的移植 陈永浩 当前Microsoft 的最新数据访问技术 ActiveX Data Objects ... 本文主要讨论如何把正使用 RDO 进行的数据访问虑移植到 ADO 上，以便大家使用 ADO 转换自己的
从 RDO到 ADO 的移植 (转) ADO2 和 RDO2 相比，一个主要的不同之处在于 ADO2 允许您创建一个记录集，并在打开该记录集之前对其属性进行设置。 Private Sub RunButton_Click() Dim rs As New ADODB.Recordset rs.Open "select * from titles...
我在CSDN参与的3000个帖子 一个简单的算法问题，怎么样在一个数组里获得4个不同的数字 29： [急急急100分求教]高手进来瞧瞧，请教算法问题！ 30： 【问】如何查找Zip包内部文件内容？ 31： 回答问题被抗议，散分 32： ...
VSFlexGrid使用技巧 如何实现将vsflexgrid中修改的数据反馈到数据库中？ Private Sub vsflexgrid1_AfterEdit(ByVal Row As Long,... rs.MoveFirst '//rs为记录集 rs.Move vsflexgrid1.Row - 1 rs.Edit If vsflexgrid1.text =
关于一个用VB编写的PING工具的问题 上去具体方法就是把PING的动作封装成ACTIVEX控件，然后用控件数组的方法去调用它，以达到同时PING多个IP的目的天极的BLOG系统也是问题多多，附件死活传不上去。否则就给你看例子了唉··大哥，我还是不明白，你留个...
