在线等待

Question

procedure TForm1.Button1Click(Sender: TObject);
var sql:string;
begin
       ADOQuery1.Close;
       ADOQuery1.SQL.Clear;
       sql:='select * from  ss_qbjl  where fm_bh='+''''+MaskEdit1.text+'''';
        sql:=sql+'and qbdate between  '+datetostr(DateTimePicker1.date)+' and '  +datetostr(DateTimePicker2.date)+'';//qbdate是datetime类型 
       ADOQuery1.SQL.Add(sql);
        ADOQuery1.ExecSQL;
        ADOQuery1.Open;
end;
运行没错  怎么不能查询到结果？？？？？在线等待

Answer 1

sql.
 我只用前面一个 sql:='select * from  ss_qbjl  where fm_bh='+''''+MaskEdit1.text+'''';能查询，但加后面就不行了

Answer 2

sql:='select * from  ss_qbjl  where fm_bh='+''''+MaskEdit1.text+'''';
        sql:=sql+'and qbdate between  '+datetostr(DateTimePicker1.date)+' and '  +datetostr(DateTimePicker2.date)+'';//qbdate是datetime类型 
改称：
     sql:='select * from  ss_qbjl  where (fm_bh='+''''+MaskEdit1.text+''''+')';
        sql:=sql+'and (qbdate between  '+datetostr(DateTimePicker1.date)+') and ('  +datetostr(DateTimePicker2.date)+')';//qbdate是datetime类型 

Answer 3

var sql:string;
begin
       ADOQuery1.Close;
       ADOQuery1.SQL.Clear;
       sql:='select * from  ss_qbjl  where  fm_bh='+''''+MaskEdit1.text+'''';
       sql:=sql+'and qbdate between  '+''''+datetostr(DateTimePicker1.date)+''''+' and '+''''+datetostr(DateTimePicker2.date)+''''+'';
       ADOQuery1.SQL.Add(sql);
        ADOQuery1.Open;
end;
这样就行了。谢谢各位