在.MDB中搜索标题

艾丹·奎因（Aidan Quinn）

IT的另一项任务。问题是：

btnSearch：用户必须能够通过输入书籍标题来搜索书籍。使用输入框从用户那里获取标题。显示标题和ISBN号

我的数据库有多个表，每个表中都有多个列。书籍标题在tblBooks表中。

这是我目前的Delphi代码：

procedure TfrmLibrary.btnSearchClick(Sender: TObject);
var
  sBookName : String;
begin
  sBookName := InputBox('Enter book Name','','') ;
  qryLibrary.Active := False;
  qryLibrary.SQL.Text := 'SELECT * FROM tblBooks WHERE TITLE = ' + sBookName + ' ;';
  qryLibrary.Active := True;

它给我一个错误，说：

项目问题1引发异常类EOLeException，消息为“参数Karoonag没有默认值”进程已停止

哦，“ Karoonag”是一本书的标题。请在这里D帮帮我：

艾丹·奎因（Aidan Quinn）

好吧，我发现自己做错了。

在执行sql文本的地方，我缺少本书的引号。现在是我的代码：

procedure TfrmLibrary.btnSearchClick(Sender: TObject);
var
  sBookName : String;
begin
  sBookName := InputBox('Enter book Name','','') ;
  qryLibrary.Active := False;
  qryLibrary.SQL.Text := 'SELECT * FROM tblBooks WHERE TITLE = "' + sBookName + '" ;'; //<--- ""
  qryLibrary.Active := True;

本文收集自互联网，转载请注明来源。

如有侵权，请联系 [email protected] 删除。