C++Builder 调用存储过程

最新推荐文章于 2021-08-02 23:17:09 发布
最新推荐文章于 2021-08-02 23:17:09 发布
阅读量3.9k 收藏 3
点赞数
CC 4.0 BY-SA版权
分类专栏： C++Builder 文章标签： c++builder 存储 sqlserver output sql c
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.youkuaiyun.com/zhouzhangkui/article/details/5597549
本文介绍了如何使用C++Builder的ADOQuery组件调用SQLServer存储过程，通过示例展示了设置输入和输出参数的过程，并给出了执行存储过程及获取输出参数值的方法。

C++Builder 调用存储过程方法有很多中

可以用TADOStoredProc专用控件；也可以用ADOQuery控件；

我一直喜欢用ADOQuery，因为ADOQuery最灵活了，可以干任何事情

有个MS SQL 的例子你先看看

了解本专栏 订阅专栏 解锁全文 超级会员免费看
Delphi使用ADO连接池(存储过程示例)
03-26
一个使用ADO连接池的示例,演示了TADOStoredProc动态参数的使用，带重连机制 =================== unit UnitDemo; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm2 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form2: TForm2; //数据库服务器 gDBServer: String = '127.0.0.1'; //数据库名称 gDBName: String = 'master'; //数据库用户名 gDBUser: String = 'sa'; //密码 gDBPass: String = '2001'; implementation {$R *.dfm} uses ADODB, UnitADOConnectionPool; const CreateSQL = 'create procedure TestMyPool (@type sysname) '#13#10+ 'as'#13#10+ 'select * from sysobjects where xtype=@type'#13#10+ 'return @@rowcount'; DeleteSQL = 'if Exists(select 1 from sysobjects where xtype=N''P'' and name=N''TestMyPool'')'#13#10+ ' drop procedure TestMyPool'; var gPoolMan: TADOConnPoolMan = Nil; procedure TForm2.Button1Click(Sender: TObject); var ADOObject:TADOConnPoolObject; ADOStoredProc:TADOStoredProc; Running :Integer; I: Integer; begin //取得一个存储过程资源（含一数据库有效连接） ADOObject := gPoolMan.CreateSP('TestMyPool'); if ADOObject = Nil then //取得资源失败 Exit; try ADOStoredProc := ADOObject.ExecObject as TADOStoredProc; Running := 2;//允许重试(两次)操作，以便在操作失败之后达到重连 while Running>0 do begin Dec(Running); if ADOObject.NeedRefresh then begin//判断是否有重连标志（比如数据库断开等，可能需要进行重连） if Not ADOObject.Reconnect then Exit; ADOObject.NeedRefresh := Not ADOStoredProc.Parameters.Refresh; if ADOObject.NeedRefresh then Exit; end; for I := 1(*Zero is the *Result* Parameter*) to ADOStoredProc.Parameters.Count - 1 do begin //========================= //传递参数 ADOStoredProc.Parameters.Items[I].Value := 'U'; //========================= end; if Running 0 then try //执行存储过程 ADOStoredProc.Open; //执行存储过程成功，退出循环进入后续的数据处理 break; except On E:Exception do begin //执行失败非程序级的异常通常有两种可能： //1.数据库连接断开 //2.自适合的参数传递当中可能存储过程已更新，参与不一致 //设置重连标志 ADOObject.NeedRefresh := True; //=================== //这里记录数据库操作失败日志 //=================== end; end; Exit; end; //========================== //从ADOStoredProc当中读取记录 ShowMessage(IntToStr(ADOStoredProc.Parameters.ParamByName('Result').Value)); //========================== //关闭存储对象的资源 ADOStoredProc.Close; finally //调用结束，释放资源 ADOObject.Free; end; end; procedure TForm2.FormCreate(Sender: TObject); var ADOConn:TADOConnection; begin (****************BEGIN*******************) (*注：仅为测试准备 *) //初始化测试环境 ADOConn := Nil; if Not TADOConnPoolMan.ConnectADO( gDBServer,gDBUser,gDBPass,gDBName,true,ADOConn) then Exit; try ADOConn.Execute(DeleteSQL); ADOConn.Execute(CreateSQL); finally try ADOConn.Close; except end; ADOConn.Free; end; (*****************END********************) //初始化连接池 gPoolMan := TADOConnPoolMan.Create(gDBServer,gDBUser,gDBPass,gDBName,true); end; procedure TForm2.FormDestroy(Sender: TObject); var ADOConn:TADOConnection; begin //释放连接池 if Assigned(gPoolMan) then gPoolMan.Free; (****************BEGIN*******************) (*注：仅为测试准备 *) //清理测试环境 ADOConn := Nil; if Not TADOConnPoolMan.ConnectADO( gDBServer,gDBUser,gDBPass,gDBName,true,ADOConn) then Exit; try ADOConn.Execute(DeleteSQL); finally try ADOConn.Close; except end; ADOConn.Free; end; (*****************END********************) end; end.
C++Builder 简易五子棋
02-21
当用户点击棋盘上的某个位置时，C++Builder中的事件处理函数会被调用，执行相应的逻辑，如检查落子是否合法、判断是否形成五子连线等。事件处理函数通常与控件（如按钮或面板）相关联，通过`OnClick`等事件触发。 ...
C++builder调用存储过程
chinayu2007的专栏
01-24 742
C++builder调用存储过程，SQLServer2005中的存储过程名为：statisticsContruction，输入参数为:CustomID ADOQuery1->Active =false; ADOQuery1->SQL->Clear(); ADOQuery1->SQL->Text = "exec statisticsContruction :CustomID
C++Builder之数据库ADO组件-TADOStoredProc学习
我的博客
08-02 473
前言：C++Builder的资料相对较少，查了很多都是Delphi的，最终还是查资料摸索出来了，完整记录在此，共享给需要的人。 String __fastcall TForm1::GetModelNumber(String SN) { //数据库连接字符串 String StrConnect = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=Root;Password=888;Initial Catalog=Test_Prod;D
c++通过ado获取存储过程的return返回值
苦寒的专栏
11-14 2739
今天写了个sql server 2005的存储过程，主要代码很简单，就是想测试存储过程中既有输入参数，又有返回值时，如何用C++去调用并获取返回值。一开始总不能运行，后来又莫名其妙地可以运行了，故写在这里做个记录。 存储过程源码： ALTER PROCEDURE [dbo].[PublishSchema] @mSchemaID int AS declare @mReturnValue int
BCB调用SQL Server存储过程
天道酬勤
04-20 1835
<br />/* 在SQLServer中建立存储过程 –DROP PROCEDURE Test; CREATE PROCEDURE Test @aa VARCHAR(15), @bb INT, @cc VARCHAR(15) OUTPUT, @dd INT OUTPUT AS BEGIN SELECT @cc=UPPER(@aa) PRINT @cc SELECT @dd=@bb+1 PRINT @dd RETURN END */ //c 和 d为输出的参数 AnsiSt
c++ ado 调用存储过程并得到输出参数和返回值
weixin_33709219的博客
10-30 313
// AccessSqlserverByAdo.cpp : 定义控制台应用程序的入口点。 // #include "stdafx.h" #include &lt;Windows.h&gt; #include &lt;iostream&gt; #include &lt;string&gt; using namespace std; #import "C:\Progr...
C++Builder的系统钩子.zip_C Builder_C++builder
07-15
C++Builder是一款强大的集成开发环境，专为C++编程语言设计，它提供了丰富的工具和库，使得开发者可以高效地创建Windows应用程序。系统钩子是Windows操作系统中的一种机制，允许程序监视和处理特定类型的系统事件。...
C++ Builder存储过程实现增删改查操作
在C++ Builder中，可以通过数据库组件如TADOStoredProc或TSQLStoredProc来调用存储过程。示例如下： ```cpp TADOStoredProc *MyStoredProc = new TADOStoredProc(this); MyStoredProc->ConnectionString = ...
C++ Builder的base64和图片互转
03-06
在IT行业中，C++ Builder是一款强大的集成开发环境（IDE），专为C++编程语言设计，提供了丰富的组件和库，使得开发者能够快速构建Windows应用程序。在本主题“C++ Builder的base64和图片互转”中，我们将深入探讨...
delphi用TAdoStoredProc调用存储过程，兼容sql2005、2008、2014的远程事务问题
weixin_30383279的博客
01-13 288
delphi7写的程序，在sql2000里没问题，调用sql2008、2014里的存储过程时，如果存储过程里操作了大量数据，很容易会莫名其妙的自己撤销掉，但是程序还识别不到，认为还在正常执行。今天尝试换了个控件：TAdoStoredProc，专门调用存储过程的，问题解决了，贴图如下： 代码： //****************************************...
ADO调用存储过程实例讲解
fox123871的专栏
09-14 2571
1：直接有返回值的存储过程： public string GetProjectCode() { string strProc = "CreateProjectNumber"; //这个@ProjectNumber输出参数的设置，必须数据类型与长度与存储过程完全一致 SqlParameter sp = new Sq
Delphi ADOStoredProc 存储过程用法
热门推荐
Microblue（严 武）
01-05 1万+
一、概述 Delphi   +   MS   SQL   Server是目前最为流行的管理信息系统开发环境和工具。Delphi的强大数据库操作控件极大地减轻了开发人员的工作量，在这些控件中，最常用的有TQuery、TTable、TADOQuery、TADOTable、TADODataSete等，这些控件执行查询操作时有一个共同的特点，即将所有数据库记录从服务器取回客户端，再根据查询的条件进行筛选。很明显，如果有大量的数据在服务器与客户端之间传递，就会降低程序执行的速度，影响应用程序的性能。针对这种情况，
Delphi中TADOConnection控件和TADOStoredProc控件的使用调用存储过程
05-09 4034
一、我们在Delphi中有时候要访问数据库操作调用存储过程来实现对数据库的
使用存储过程并返回值与及返回值的获得方法
HennyChen的专栏
06-29 788
使用存储过程并返回值与及返回值的获得方法 CREATE TABLE [dbo].[Order]( [o_id] [bigint] IDENTITY(1,1) NOT FOR REPLICATION NOT NULL, [o_buyerid] [int] NOT NULL ) 1.OUPUT参数返回值例： 向Order表插入一条记录,返回其标识 CREATE PROCEDURE [d
评论 1
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
表情包 代码片
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

周药师

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付：¥1
获取中
扫码支付

您的余额不足，请更换扫码支付或充值

打赏作者

实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值