??????????????????????????????????????????????

bandrui 2003-08-22 09:38:48
procedure TForm2.ComboBox1Change(Sender: TObject);
begin
dm.DataModule3.Query_login.Close;
Dm.DataModule3.Query_login.SQL.Clear;
Dm.DataModule3.Query_login.SQL.Add('select * from jsx.dbo.jsx_userpwd where dept='+combobox1.Text);
dm.DataModule3.Query_login.open;
while not dm.DataModule3.Query_login.Eof do
begin
form2.ComboBox2.Items.Add(dm.DataModule3.Query_login.fieldbyname('username').asstring);
dm.DataModule3.Query_login.next;
end;
end;

错误提示:
product manager.exe raised exception class EDBengineerror with message 'invalid field name『ODBC SQL Drive』『SQL SERVER』列名‘预定部’'无效,
...全文
22 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
myadvice 2003-08-22
  • 打赏
  • 举报
回复
楼上那位兄弟所言即是:

在Sql语句条件中的字符串是需要加单引号的
xuejinlong 2003-08-22
  • 打赏
  • 举报
回复
Dm.DataModule3.Query_login.SQL.Add('select * from jsx_userpwd where dept='''+combobox1.Text+'''');
belllab 2003-08-22
  • 打赏
  • 举报
回复
Dm.DataModule3.Query_login.SQL.Add('select * from jsx.dbo.jsx_userpwd where dept='''+combobox1.Text+'''');

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧