请看下面这段程序: ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('insert into book values(:account,:bookname)');
ADOQuery.Parameters.ParamByName('account').Value:=Edit_account.text;
ADOQuery.Parameters.ParamByName('bookname').Value:=Edit_bookname.Text ; try
ADOQuery.ExecSQL;
MessageDlg('图书添加成功!!', mtInformation, [mbYes], 0);
except
MessageDlg('数据没有正常提交!!', mtInformation, [mbYes], 0);
end;
ADOQuery.Free;
注意最后一句:如果是 ADOQuery.Free,执行,添加记录,第一次成功,第二次就失败。如果用:ADOQuery.Close,每次都成功。
请问它们的区别是什么?为什么ADOQuery.Free会报错呢?
ADOQuery.SQL.Add('insert into book values(:account,:bookname)');
ADOQuery.Parameters.ParamByName('account').Value:=Edit_account.text;
ADOQuery.Parameters.ParamByName('bookname').Value:=Edit_bookname.Text ; try
ADOQuery.ExecSQL;
MessageDlg('图书添加成功!!', mtInformation, [mbYes], 0);
except
MessageDlg('数据没有正常提交!!', mtInformation, [mbYes], 0);
end;
ADOQuery.Free;
注意最后一句:如果是 ADOQuery.Free,执行,添加记录,第一次成功,第二次就失败。如果用:ADOQuery.Close,每次都成功。
请问它们的区别是什么?为什么ADOQuery.Free会报错呢?
解决方案 »
- 如何传递form和panel变量的问题
- 急请兼职程序员
- 用webbrower.navigate('http://wwww.xx.asp?sss=aa')来提交一个ASP页但为什么?
- 关于计数器的问题
- dbExpress用来连SQL Server数据库的问题,没法解决,请帮忙
- 如何使得表中一项FIELD的值从一排下去...?
- 各位高手,如何将ASCII码表示的数据转换成十六进制表示的数据,有没有什么函数?相信这里还是有高手的,不会连这个问题都解决不了吧??
- Delphi里怎样动态添加菜单?
- 天马流星汗
- 请问怎样把DBgrif空件中显示的数据存成Txt文件或者其他格式文件
- ***********数据的导入导出
- 帮忙看看这个类型转换,急啊
你都把ADOQuery释放了。。还怎么操作?
很白的回答= =能明白了吧
请介绍一下Delphi深入一点的电子书好吗?给几个链接或网站。