在delphi中怎么调用存储过程

ysx192 2003-07-21 10:08:36
怎么样在delphi调用存储过程,我是用ado连数据库的,最好有源码实例
...全文
36 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
大地精灵 2003-07-23
  • 打赏
  • 举报
回复
同意firetoucher(风焱)
to Knight_yin(狂徒骑士)就这么点分,我看你没了啊
Knight_yin 2003-07-23
  • 打赏
  • 举报
回复
这些都可以,我顶顶,顺便捞点分。
yesxwl 2003-07-21
  • 打赏
  • 举报
回复
adoStoredProc控件
设置connection:=adoconnection1
在adoStoredProc.ProcedureName:=对应数据库的存储过程名;
设置相应的parameters
adostoredProc1.active:=True;//返回结果
adostoredProc1.execProc;//不返回结果
firetoucher 2003-07-21
  • 打赏
  • 举报
回复
try
ADOStoredProc := TADOStoredProc.Create(nil);
ADOStoredProc.Connection := ADOConnection;

ADOStoredProc.ProcedureName := 'SCount';
ADOStoredProc.Parameters.CreateParameter('sid', ftInt, pdInput, 4, 0);
ADOStoredProc.Parameters.CreateParameter('name', ftString, pdInput, 20, name);
ADOStoredProc.Parameters.CreateParameter('Rcount', ftBoolean, pdReturnValue, 4, 0);

ADOStoredProc.Prepared := True;
ADOStoredProc.ExecProc;
Result := ADOStoredProc.Parameters.ParamByName('Result').Value;
finally
ADOStoredProc.Free;
end;
firetoucher 2003-07-21
  • 打赏
  • 举报
回复
try
ADOStoredProc := TADOStoredProc.Create(nil);
ADOStoredProc.Connection := ADOConnection;

ADOStoredProc.ProcedureName := 'SCount';
ADOStoredProc.Parameters.CreateParameter('sid', ftInt, pdInput, 4, 0);
ADOStoredProc.Parameters.CreateParameter('name', ftString, pdInput, 20, name);
ADOStoredProc.Parameters.CreateParameter('Rcount', ftBoolean, pdReturnValue, 4, 0);

ADOStoredProc.Prepared := True;
ADOStoredProc.ExecProc;
Result := ADOStoredProc.Parameters.ParamByName('Result').Value;
finally
ADOStoredProc.Free;
end;
soaringsouth 2003-07-21
  • 打赏
  • 举报
回复
ADoquery.sql.add('存储过程名 参数')

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧