adoquery3.SQL.Clear;
adoquery3.SQL.Add('Update Adm');
adoquery3.SQL.Add('set Adm_Role = :A');
adoquery3.SQL.Add('where Adm_Role = :B');
adoQuery3.Parameters.ParamByName('A').Value := dbedit1.Text;
adoQuery3.Parameters.ParamByName('B').Value := PriviorName;
adoquery3.ExecSQL;
我想更新Adm表中Adm_Role列的值为PriviorName的记录,使它的值变成dbedit1.text中的内容,但是调试时发现尽管dbedit1.text和PriviorName有值,但是没有传给A和B,究竟是怎么回事?是不是要将dbedit1.text和PriviorName改成常量才行
adoquery3.SQL.Add('Update Adm');
adoquery3.SQL.Add('set Adm_Role = :A');
adoquery3.SQL.Add('where Adm_Role = :B');
adoQuery3.Parameters.ParamByName('A').Value := dbedit1.Text;
adoQuery3.Parameters.ParamByName('B').Value := PriviorName;
adoquery3.ExecSQL;
我想更新Adm表中Adm_Role列的值为PriviorName的记录,使它的值变成dbedit1.text中的内容,但是调试时发现尽管dbedit1.text和PriviorName有值,但是没有传给A和B,究竟是怎么回事?是不是要将dbedit1.text和PriviorName改成常量才行
解决方案 »
- 已知出生年月日,求当前出生月数,如何编写代码,求
- 哪位高手帮写个只能访问一个指定页面的流览器的程序啊??一百分求助啊。
- 谁帮我看看这几行代码?
- 如何模拟TAB键??
- 请教各位!有没有非模式的消息框,既 MessageBox 之类。
- 如何用Delphi做类似QQ那样拖到边上就自动隐藏的窗体?
- 关于路径返回
- 關於COM
- 我是菜鸟,迷于网络,想自做一个网页,不过只会HTML语言。请问各位如何上路?
- 在html如何相应ActiveFrom的事件
- 用delphi7开发的webservice客户端程序如何截取发向服务端和从服务端接收的xml数据
- 如何将一个二维的动态数组作为参数传递给子例程。。?(抱歉,没分了)
2 adoquery3.SQL.Add('Update Adm');
3 adoquery3.SQL.Add('set Adm_Role = :A');
4 adoquery3.SQL.Add('where Adm_Role = :B');
5 adoQuery3.Parameters.ParamByName('A').Value := dbedit1.Text;
6 adoQuery3.Parameters.ParamByName('B').Value := PriviorName;
7 adoquery3.ExecSQL;
你把第5行的dbedit1.text 换为edit1.text试试
adoquery3.SQL.Clear;
adoquery3.SQL.Add('Update Adm');
adoquery3.SQL.Add('set Adm_Role = :A');
adoquery3.SQL.Add('where Adm_Role = :B');
adoQuery3.Parameters.ParamByName('A').asstring := dbedit1.Text;
adoQuery3.Parameters.ParamByName('B').asstring := 'PriviorName';
adoquery3.ExecSQL;
这样试试。
PriviorName;问题可能出这两个,你换其他值试一下,再检查一下这两个值。
adoquery3.Clear;
adoquery3.SQL.Text:='update Adm set Adm_role='''+trim(dbedit1.text)+''' '
+ 'where adm_role='''+priviorname+''' ';
adoquery3.ExecSQL;
adoquery3.SQL.Clear;
adoquery3.SQL.Add('Update Adm');
adoquery3.SQL.Add('set Adm_Role = :A');
adoquery3.SQL.Add('where Adm_Role = :B');
adoQuery3.Parameters.ParamByName('A').asstring := //替换成dbedit1.Text指向的数据集字段;
adoQuery3.Parameters.ParamByName('B').asstring := 'PriviorName';
adoquery3.ExecSQL;
这样试试。
把dbedit1.Text 和 PriviorName都换成常量试试,如果没问题,就说明这两个变量有问题了