可以用Access 传递查询直接将命令发送到数据库服务器。
建立Access 传递查询步骤如下:
(1)
在数据库窗口中单击查询选项卡,然后单击新建按钮。
(2)
新建查询对话框中单击设计视图选项,然后单击确定按钮。
(3)
显示表对话框内单击关闭按钮。
(4)
查询菜单上,指到“SQL 语句条件,然后单击传递命令。
(5)
在工具栏上,请单击属性按钮以显示查询属性表。
(6)
在查询属性表中,请设置“ODBC 连接字符串属性来指定要连接的数据库信息。可以输入连接信息: ”ODBC;DSN=ntserver0;UID=sa;PWD=;DATABASE=BMS”,或用生成器按钮生成。
(7)
因存储过程不用返回记录,所以将返回记录属性设置为
(8)
“SQL 传递查询窗口中,输入传递查询: exec statisticsStatistics SQL Server 数据库的一个存储过程。

带参数的输入传递查询: exec statistics  参数1,参数2
(9) 关闭查询,保存查询为:stat_query
运行传递查询的方法有:
(1)
Microsoft Access的宏 OpenQuery
(2)
用下面的事件过程:
Private Sub
统计_Click()
Dim dbs As Database, qdf As QueryDef
Dim tmq As Dynaset
Dim strSQL As String

Set dbs = CurrentDb
打开上面建的传递查询stat_query
Set qdf = dbs.OpenQueryDef(“stat_query “)
qdf.Execute
Set dbs = Nothing
End Sub

原文地址:http://www.cnblogs.com/QunShan/p/16829888.html

1. 本站所有资源来源于用户上传和网络,如有侵权请邮件联系站长! 2. 分享目的仅供大家学习和交流,请务用于商业用途! 3. 如果你也有好源码或者教程,可以到用户中心发布,分享有积分奖励和额外收入! 4. 本站提供的源码、模板、插件等等其他资源,都不包含技术服务请大家谅解! 5. 如有链接无法下载、失效或广告,请联系管理员处理! 6. 本站资源售价只是赞助,收取费用仅维持本站的日常运营所需! 7. 如遇到加密压缩包,默认解压密码为"gltf",如遇到无法解压的请联系管理员! 8. 因为资源和程序源码均为可复制品,所以不支持任何理由的退款兑现,请斟酌后支付下载 声明:如果标题没有注明"已测试"或者"测试可用"等字样的资源源码均未经过站长测试.特别注意没有标注的源码不保证任何可用性