开发者社区> annehan> 正文
阿里云
为了无法计算的价值
打开APP
阿里云APP内打开

VB6.0 调用存储过程

简介: 最近有在做一个需求,需要在VB6.0中调用存储过程,整理了一下,供大家参考, 范例: 1 Function callStoredProcedure(sEmployeeID As String, Optional sNotes As String = "") As String 2 On Error GoTo errHand 3 Dim conn As ADODB.
+关注继续查看

最近有在做一个需求,需要在VB6.0中调用存储过程,整理了一下,供大家参考,

范例:

 1 Function callStoredProcedure(sEmployeeID As String, Optional sNotes As String = "") As String
 2     On Error GoTo errHand
 3     Dim conn As ADODB.Connection
 4     Set conn = "driver={SQL Server};server=(local);uid=sa;pwd=;database=pubs"
 5 
 6     Dim adoComm As Object
 7     Set adoComm = CreateObject("ADODB.Command") '创建一个对象,用来调用存储过程
 8     With adoComm
 9         .ActiveConnection = conn '设置连接
10         .CommandType = 4 '类型为存储过程,adCmdStoredProc = 4
11         .CommandText = "dbo.SP_BIG_CASE_REPORT" '存储过程名称
12         '.Parameters.Item("存储过程中参数的名称").Value = “值”
13         .Parameters.Item("@EmployeeID").Value = sEmployeeID '设置输入参数
14         .Parameters.Item("@Notes").Value = sNotes
15         .Execute '执行存储过程
16     End With
17     Set conn = Nothing
18     
19     Exit Function
20 errHand:
21     MsgBox "callStoredProcedure Error : " & Err.Description, vbOKOnly + vbCritical, sApplicName
22 End Function

 

 

如果您看了本篇博客,觉得对您有所收获,请点击右下角的 [推荐]

如果您想转载本博客,请注明出处

如果您对本文有意见或者建议,欢迎留言

感谢您的阅读,请关注我的后续博客

版权声明:本文内容由阿里云实名注册用户自发贡献,版权归原作者所有,阿里云开发者社区不拥有其著作权,亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容,填写侵权投诉表单进行举报,一经查实,本社区将立刻删除涉嫌侵权内容。

相关文章
存储过程
存储过程(Stored Procedure)是在大型数据库系统中,一组为了完成特定功能的SQL 语句集,存储在数据库中经过第一次编译后再次调用不需要再次编译,用户通过指定存储过程的名字并给出参数(如果该存储过程带有参数)来执行它。
741 0
存储过程
           好久不写博了,博主一直忙着学习了,今天把主要总结的内容展示如下:              点击看图         详细分解:                   点击看图        此图显示不全,如想完全显示,必须点击图片在新页面中查看。
715 0
存储过程
1 declare @i int 2 set @i=0 3 begin transaction 4 while @i
586 0
通用分页存储过程
/*--实现分页的通用存储过程 显示指定表、视图、查询结果的第X页对于表中主键或标识列的情况,直接从原表取数查询,其它情况使用临时表的方法如果视图或查询结果中有主键,不推荐此方法如果使用查询语...
565 0
通用存储过程.分页存储过程
/*名称:spAll_ReturnRows输入:输出:调用:  EXEC spAll_ReturnRows 'SELECT  * FROM 表名', 页号, 返回记录数, '主键', '排序字段'  spAll_ReturnRows 'SELECT  * FROM all_Categories',2,10,'[ID]','[ID]'说明:[百万级]通用存储过程.
524 0
+关注
annehan
一个95后 一个程序媛
48
文章
0
问答
文章排行榜
最热
最新
相关电子书
更多
低代码开发师(初级)实战教程
立即下载
阿里巴巴DevOps 最佳实践手册
立即下载
冬季实战营第三期:MySQL数据库进阶实战
立即下载