先select,再把查到的记录写到文件里,下面是代码,在MYSQL5.x通过了,但在MYSQL3.x上用就是通不过,提示“多步操作产生错误 请检查每一步的操作值”
with ADOQuery2 do
begin
Close;
SQL.Clear;
SQL.Text:='select * from zdz_instant where date between :bt and :et';
prepared:=True;
parameters.ParamByName('bt').Value:=strtodatetime('2006-08-27 17:25:00');
parameters.ParamByName('et').Value:=strtodatetime('2006-08-27 18:25:00');
Open;
end;
ADOQuery2.First;
while not ADOQuery2.Eof do
begin
for i:=0 to ADOQuery2.FieldCount-1 do
begin
if ADOQuery2.Fields.Fields[i].asstring='' then
cols:=cols+'\N'+chr(9)
else
cols:=cols+ADOQuery2.Fields.Fields[i].asstring+chr(9);
end;
sqlbulk.Add(cols);
cols:='';
ADOQuery2.Next;
end;
错误好像就出在fields里,到底什么原因?
with ADOQuery2 do
begin
Close;
SQL.Clear;
SQL.Text:='select * from zdz_instant where date between :bt and :et';
prepared:=True;
parameters.ParamByName('bt').Value:=strtodatetime('2006-08-27 17:25:00');
parameters.ParamByName('et').Value:=strtodatetime('2006-08-27 18:25:00');
Open;
end;
ADOQuery2.First;
while not ADOQuery2.Eof do
begin
for i:=0 to ADOQuery2.FieldCount-1 do
begin
if ADOQuery2.Fields.Fields[i].asstring='' then
cols:=cols+'\N'+chr(9)
else
cols:=cols+ADOQuery2.Fields.Fields[i].asstring+chr(9);
end;
sqlbulk.Add(cols);
cols:='';
ADOQuery2.Next;
end;
错误好像就出在fields里,到底什么原因?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货