![]() |
#2
court12010-07-28 10:29
回复 楼主 court1
|
begin
with adoquery1 do
begin
close;
sql.Clear ;
sql.Add('insert into pay(date,id,name,bpay,apay) values (:date,:id,:name,:bpay,:apay)');
Parameters.ParamByName('date').value:=edit1.text;
Parameters.ParamByName('id').value:=edit2.text;
Parameters.ParamByName('name').value:=edit3.text;
Parameters.ParamByName('bpay').value:=edit4.text;
Parameters.ParamByName('apay').value:=edit5.text;
execsql;
showmessage('保存成功')
end;
end.
开始正常进入程序
为什么一点击“添加”按钮运行就出现错误
只有本站会员才能查看附件,请 登录
我是在dbgrid显示access数据库内容 使用了一个 datasource 和一个adoquery控件连接到access数据库上,
是我链接不对吗?
[ 本帖最后由 court1 于 2010-7-28 10:30 编辑 ]