SelectSqlServer:='select * from userName where usernames="'+Txtusername+'"';//提示Txtusername值列名无效!真是想不通啊!
form1.ADOQuery2.Close;
form1.ADOQuery2.SQL.Clear;
form1.ADOQuery2.SQL.Add(SelectSqlServer);
form1.ADOQuery2.open;
TxtName:=form1.ADOQuery2.Parameters.ParamByName('UserNames').Value;
form1.ADOQuery2.Close;
form1.ADOQuery2.SQL.Clear;
form1.ADOQuery2.SQL.Add(SelectSqlServer);
form1.ADOQuery2.open;
TxtName:=form1.ADOQuery2.Parameters.ParamByName('UserNames').Value;
解决方案 »
- D7安装FastReport 4出错:没有找到tee70.bpl。急啊!
- 捐献所有分 求简单的文件传输程序 例子 急!好心人帮忙啊!
- 无法执行 WinExec(pchar('regsvr32 C:\Program Files\MSoft\conreg.dll'),1);
- 求<串口通信编程>电子书
- 有关运算问题
- 各位大虾!帮忙啊,小弟毕业设计难题,急啊!,在线等!
- 实现像QQ上线通知那样的风格?
- Delphi 8.0好难装呀。有谁已经装上,讲一下怎么注册吧。
- 要个新QQ号,验证后马上给分!
- 如何用Delphi编写访问交换机的命令
- Fastreport制作报表 树形图的问题
- DBGrid组件中如何定义鼠标右键弹出菜单
ADOquery1.SQL.Clear;
ADOquery1.SQL.Add('select * from stuinfo where 学号=:xh');
ADOquery1.Parameters.ParamByName('xh').Value:=trim(edit1.Text);
Adoquery1.Open;
改写
SelectSqlServer:='select * from userName where usernames='+quotedstr(Txtusername)
或者
SelectSqlServer:='select * from userName where usernames='''+Txtusername+'''';(全部用单引号)
or
SelectSqlServer:='select * from userName where usernames=:userstr';
{考虑一楼的办法}