adoquery1.Close;
adoquery1.SQL.clear;
adoquery1.sql.add('update book set price='''+trim(price1.text)+'''');
adoquery1.sql.add(' where book_number='''+trim(dblookupcombobox1.text)+'''');
adoquery1.ExecSQL;
adoquery1.SQL.clear;
adoquery1.sql.add('update book set price='''+trim(price1.text)+'''');
adoquery1.sql.add(' where book_number='''+trim(dblookupcombobox1.text)+'''');
adoquery1.ExecSQL;
解决方案 »
- 把16进制字符串转字符串怎么写算法?
- Delphi 7 打开源码 为什么不可以调试?
- 用window服务启动另一程序问题.
- 【求助】如何实现Delphi与Asp之间的变量互传?
- 俩猩猩了,按照规矩散分,马甲再散一次,呵呵
- 初学Delphi,求救!
- 在什么地方可以下Delphi6新增加的帮助?在已经安装了UpdatePack 2以后如何安装Extreme Toys 里的InVokable?
- 关于BDE打包问题
- 今天终于用上delphi6了 太高兴了!!!!!!!!
- 如何在主程序启动的时候就打开子窗口,并使其“停靠”在主窗口的penal上
- delphi clientdataset filter问题
- 如何才能让dbgril1能正常显示SQL语句中的汉字或者特殊字符?
这句有问题,SQL语句中的等于是一个=,不是==。
第二个问题是SQL语句中的对字符串的处理,不能加双引号,需要用QuotedStr()函数处理
adoquery1.sql.add('update book set price='+‘QuotedStr(trim(price1.text))’);
begin
SQL:='update book set price='+#39+Trim(price1.text)+#39+
' where book_number=='+#39+Trim(dblookupcombobox1.text)+#39;
adoquery1.Close;
adoquery1.SQL.clear;
adoquery1.sql.add(SQL);
adoquery1.ExecSQL;SQL语句这样写一般不会出现错误。
begin
SQL:='update book set price='+#39+Trim(price1.text)+#39+
' where book_number='+#39+Trim(dblookupcombobox1.text)+#39;
adoquery1.Close;
adoquery1.SQL.clear;
adoquery1.sql.add(SQL);
adoquery1.ExecSQL;报谦,贴码错误。