完善资料让更多小伙伴认识你,还能领取20积分哦, 立即完善>
ActiveCommand 属性应用实例(VB) 本范例演示 ActiveCommand 属性。 为子例程提供了一个 Recordset 对象,该对象的 ActiveCommand 属性用于显示创建 Recordset 的命令文本和参数。 Public Sub Main() Public Sub ActiveCommandX() strPrompt = "Enter an author's name (e.g., Ringer): " cnn.Open "DSN=Pubs;Provider=MSDASQL; uid=sa; pwd=;" rst.Close 对 ActiveCommandXprint 例程仅提供一个 Recordset 对象,而例程必须打印创建 Recordset 的命令文本和参数。由于 Recordset 对象的 ActiveCommand 属性输出相关的 Command 对象,所以可以这么做。 Command 对象的 CommandText 属性输出创建 Recordset 的参数化命令。Command 对象的 Parameters 集合输出替代命令参数占位符(“?”)的值。 最后将打印错误消息或作者的名字和 ID。 Public Sub ActiveCommandXprint(rstp As ADODB.Recordset) strName = rstp.ActiveCommand.Parameters.Item("LastName").Value Debug.Print "Command text = '"; rstp.ActiveCommand.CommandText; "'" If rstp.BOF = True Then End Sub |
|
相关推荐
|
|
只有小组成员才能发言,加入小组>>
11860 浏览 2 评论
4287 浏览 3 评论
3471 浏览 5 评论
8551 浏览 47 评论
4069 浏览 9 评论
451浏览 0评论
小黑屋| 手机版| Archiver| 电子发烧友 ( 湘ICP备2023018690号 )
GMT+8, 2024-4-26 20:05 , Processed in 0.532013 second(s), Total 73, Slave 55 queries .
Powered by 电子发烧友网
© 2015 bbs.elecfans.com
关注我们的微信
下载发烧友APP
电子发烧友观察
版权所有 © 湖南华秋数字科技有限公司
电子发烧友 (电路图) 湘公网安备 43011202000918 号 电信与信息服务业务经营许可证:合字B2-20210191 工商网监 湘ICP备2023018690号