unidac 如何对数据的插入和更新

kuvske 2012-05-10 10:17:30
1、使用unidac 如何得到有返回是否插入数据成功

2、使用unidac 如何得到有返回是否更新数据成功

下面是我关于数据查询和无返回结果的插入数据,求教如何处理上面的两个问题
--数据的查询
with form1.UniQuery1 do
form1.UniQuery1.Close;
form1.UniQuery1.SQL.Clear;
form1.UniQuery1.SQL.Add('select TareNo 皮重号,TareWeigth*0.001 重量 from umttare_tmp');
form1.UniQuery1.Open;
--无返回值的插入数据
form1.UniQuery4.Close;
form1.UniQuery4.SQL.Clear;
form1.UniQuery4.SQL.Text:='insert UMTTare_Tmp (ScaleID,TareNo,TareWeigth,dummy) values(0,:a,:b,null)';
form1.UniQuery4.ParamByName('a').Value := form1.Edit1.Text;
form1.UniQuery4.ParamByName('b').Value := form1.Edit2.Text;
form1.UniQuery4.ExecSQL;
...全文
265 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
kaikai_kk 2012-05-10
  • 打赏
  • 举报
回复
ExecSQL返回的是Integer类型,结果就是更新的记录数

i:=form1.UniQuery4.ExecSQL;
showmessage(inttostr(i));
jjpweb 2012-05-10
  • 打赏
  • 举报
回复
要想有返回值整个存储过程 out一个参数。

不用存储过程try except 一下,无异常视为成功。

5,379

社区成员

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

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