ado查询错在哪里？(vf中的sql查询)，如果回答的详细可再加分

Question

你可以先在sql server看能否行的通；
在那儿，更好判断

Answer 1

我把str1变量内容，粘贴到foxpro中好使，粘贴到bde中不好使

Answer 2

在bde中主要是日期查询不好使，不知道为什么？
在delphi查询的字符串中使用的函数是不是只要vfp支持就行，
不用管delphi是否支持

Answer 3

vfp自身也能够解析sql语句，所以sql语句只要符合foxpro数据库的标准就应该没有问题！

Answer 4

我刚才试了一下，只要是vfp的数据库，使用你的语句应该没有问题，另外选取字段的时候，你还是把别名加全，不然可能会不知道你选取的那个表中的字段！

Answer 5

str1:=str1+' and between(rq,{'+rq1+'},{'+rq2+'})';
上面这句应修改为：
 str1:=str1+' and (rq between :rq1 and :rq2))';

Answer 6

to nne998(上上下下左右左右BABA)  and  wylove(阿刚)
我按楼上几位兄弟做了，但是不对

Answer 7

不要用ADOQuery.open
用ADOQuery.ExecSQL

Answer 8

form1.ADOConnection1.close;
  rq1:='2001-08-01';
  rq2:='2001-08-31';
  form1.ADOQuery1.Close;
  form1.ADOConnection1.Open;
  form1.adoquery1.sql.clear;
  form1.adoquery1.sql.add('select daa01.cyjh,rq,ccynd,ccynd1');
  form1.adoquery1.sql.add(' from daa01,dba01');
  form1.adoquery1.sql.add(' where daa01.jh=dba01.jh');
  form1.adoquery1.sql.add(' and (dba01.ccynd<>0 or dba01.ccynd1<>0)');
  form1.adoquery1.sql.add(' and rq between :rq1 and :rq2');
  form1.ADOQuery1.Parameters.ParamByName('rq1').value:=strtodate('2001-08-01');
  form1.adoquery1.parameters.parambyname('rq2').value:=strtodate('2001-08-31');
  form1.label1.Caption:=form1.ADOQuery1.SQL.text;
  form1.ADOQuery1.Prepared;
  form1.ADOQuery1.Open;你要确认是不是SQL语句的问题，你要把错误提示贴出来。

Answer 9

---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EOleException with message '数据提供程序或其他服务返回 E_FAIL 状态。'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help   
---------------------------
出错信息如上

Answer 10

这是按你写的代码出的提示出错信息。(为日期型参数时)
重贴一遍关键代码：
procedure TForm1.Button1Click(Sender: TObject);
var
  str1:string;
  rq1,rq2:Tdatetime;
begin
  form1.ADOConnection1.close;
  form1.ADOQuery1.Close;
  form1.ADOConnection1.Open;
  form1.adoquery1.sql.clear;
  form1.adoquery1.sql.add('select daa01.cyjh,rq,ccynd,ccynd1');
  form1.adoquery1.sql.add(' from daa01,dba01');
  form1.adoquery1.sql.add(' where daa01.jh=dba01.jh');
  form1.adoquery1.sql.add(' and (dba01.ccynd<>0 or dba01.ccynd1<>0)');
  form1.adoquery1.sql.add(' and rq between :rq1 and :rq2');
  form1.ADOQuery1.Parameters.ParamByName('rq1').value:=strtodate('2001-08-01');
  form1.adoquery1.parameters.parambyname('rq2').value:=strtodate('2001-08-31');
//  form1.label1.Caption:=form1.ADOQuery1.SQL.text;
  form1.ADOQuery1.Prepared;
  form1.ADOQuery1.Open;
end;

Answer 11

第一便时，sql语句时正确的
第二遍时，sql语句等于两次得相加了，所以出错了，
运行一遍后，要把变量变成空
可以了吗？