Office中国论坛/Access中国论坛

标题: ADO调用SQL SERVER存储过程几例 [打印本页]

作者: koutx 时间: 2015-8-23 17:23
标题: ADO调用SQL SERVER存储过程几例
本帖最后由 koutx 于 2015-8-24 09:59 编辑

将在Access中用ADO调用update、insert、delete三种存储过程代码整理了一下发上，供坛友们参考。
Dim cmd As New ADODB.Command
Set cmd.ActiveConnection = cn() '这里将连接对象赋值给命令对象cmd的激活连接 cn()
cmd.CommandType = adCmdStoredProc '设置命令类型为存储过程
1、将客户李四改为张三：
cmd.CommandText = "update_khb_1"
'给存储过程的输入参数赋值
cmd.Parameters("@客户_2").Value = "张三"
cmd.Parameters("@客户_1").Value = "李四"
或
2、删除叫李四的客户：
cmd.CommandText = "delete_khb_1"
cmd.Parameters("@客户_1").Value = "李四"
或
3、新增叫王五的客户：
cmd.CommandText = "insert_khb_1"
cmd.Parameters("@客户_1").Value = "王五"
'debug.print cmd.Parameters(0).Value'获取刚加入的客户的ID号
cmd.Execute
cn.Close
注：存储过程附于下图。与SQL SERVER库的连接自定义函数cn()省略
[attach]57114[/attach][attach]57115[/attach][attach]57116[/attach]

作者: leonshi 时间: 2015-8-23 19:26
谢谢分享

作者: leonshi 时间: 2015-8-23 19:31
顺便请教一个问题，我在使用存储过程时候，我重新启动服务器后，access客户端窗体第一次调用存储的时候比较慢，后面就好正常了。

作者: koutx 时间: 2015-8-24 09:58
单就这一泛泛的现象而言，可真说不好。别说你重新打开服务器时，即便你关闭SQL SERVER服务管理器再重新启动它，客户端的反应都须等上一会儿才能顺畅。

作者: leonshi 时间: 2015-8-24 11:52
谢谢建议

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)