aqPer := TADOQuery.Create(nil);
aqPer.Connection := dmPer.adocnll;
aqPer.SQL.Text := 'select * from admin where id=' + Trim(edtuid.Text)) + '';
aqPer.Open;上面为何会出错啊?????????
aqPer.Connection := dmPer.adocnll;
aqPer.SQL.Text := 'select * from admin where id=' + Trim(edtuid.Text)) + '';
aqPer.Open;上面为何会出错啊?????????
解决方案 »
- FastReport没有显示在Palette中
- 散分,方便的话请投我女儿一票吧
- 遇到奇怪的问题,百思不解
- 这个问题我想了很久了,希望大家帮帮我。
- 一个很重要的问题.关于indy http提交特殊字符的问题.
- 键盘输入冲突问题
- 怎样显示Clientdataset的Delta中的数据在DBGRID中?
- 请问delphi菜单上的add to projet按钮有什么用的。我比较少用那按钮,我一般只用open按钮
- 机会只是等待有准备的人?
- 在C/S三层结构中,服务器器如发生意外时(关闭或死机),客户端如何捕获到这个错误?
- 请问:有谁知道THexEditor控件哪里可以下载吗?谢谢
- DLL动态库问题,高手请进!
edtuid.Text 是否有值?
多了个“)”aqPer.SQL.Text := 'select * from admin where id=' + Trim(edtuid.Text) + '';
'select * from admin where id ='+#39+trim(EditID.text)+#39
#39代表'符号;
改为:
aqPer.SQL.Text := 'select * from admin where id=' + Trim(edtuid.Text);
id是关键字。
aqPer.SQL.Parameters.ParamByName('ID').Value:=Trim(edtuid.Text)
aqPer.SQL.Text := 'select * from admin where id='''+Trim(edtuid.Text)+ ''''
aqPer.SQL.Text := 'select * from admin where id=''' + Trim(edtuid.Text) + '''';
aqPer.Connection := dmPer.adocnll;
aqPer.SQL.Text := 'select * from admin where id=' + Trim(edtuid.Text)) + '';
showmessage(aqPer.CommandText)
aqPer.Open;
你的where 语句有问题,要这样写:
aqPer.SQL.Text := 'select * from admin where id=' +''''+ Trim(edtuid.Text)+'''';
无论Edit.Text是否是为空的,都应该不会报错!
SQL语句写错了,
aqPer.SQL.Text := 'select * from admin where id=''' + Trim(edtuid.Text)) + '''';
或者
aqPer.SQL.Text := 'select * from admin where id=' + quotedstr(Trim(edtuid.Text));
aqPer.SQL.Text := 'select * from admin where id='''+Trim(edtuid.Text)+ ''''
aqper.paramsters.parambyanem('A').value:=Trim(edit1.text);
aqPer.Connection := dmPer.adocnll;
aqPer.SQL.Text := 'select * from admin where id='+''''+Trim(edtuid.Text))+''''; ///这些引号够麻烦的,这样就可以了
aqPer.Open;