小弟头都晕了，这个程序哪里错了！！

Question

这个是个CGI
  错误说：第二行％附近有错误procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
  var
   temp1,temp2:string;
  begin
adoquery1.Close ;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select*from pt_yjjlynr');
temp1:=request.queryfields.values['fd'];
temp2:=''''+request.queryfields.values['v1']+'%'+'''';
adoquery1.SQL.Add('where'+temp1+'like'+temp2);
adoquery1.Prepared;
adoquery1.Open;
if adoquery1.RecordCount=0 then begin
   DataSetTableProducer1.Footer.Add('<p>对不起，找不到你要的数据<p>');
   DataSetTableProducer1.footer.add('您退回去，再输入<p>')
   end;
   DataSetTableProducer1.footer.add('</html>');
   response.content:=DataSetTableProducer1.content;
end;end.