Query 问题将数据导出有点问题!
void __fastcall TForm1::Button2Click(TObject *Sender)
{
DataModule2->1->Close();
DataModule2->Query1->SQL->Clear();
DataModule2->Query1->SQL->Add("SELECT distinct Taijie FROM bk ");
DataModule2->Query1->ExecSQL();//; 不想得到任何数据 Open()返回表的某行
AnsiString str; char path[100]; // long i=0; * Nf where =35
if(!SaveDialog1->Execute()) return;
str= SaveDialog1->FileName;
if(!DataModule2->Query1->Bof)
DataModule2->Query1->First();
ofstream ws(str.c_str());
while(!DataModule2->Query1->Eof)
{if(DataModule2->Query1Nbs->AsInteger==1) str="S";
else str="N";
str=str+DataModule2->Query1Taijie->AsString
+DataModule2->Query1Year->AsString+"."+DataModule2->Query1Bdh->AsString;
ws<<str.c_str()<<endl;
DataModule2->Query1->Next();
}
ws.close();
}
问题点数:0、回复次数:3Top
1 楼gxgl(zkw)回复于 2003-12-01 20:04:53 得分 0
补充一下!
DataModule2->Query1->SQL->Add("SELECT * FROM bk where Taijie=125 ");
DataModule2->Query1->Open();//ExecSQL();//
有结果返回
DataModule2->Query1->SQL->Add("SELECT distinct Taijie FROM bk ");
DataModule2->Query1->ExecSQL();//
无结果返回
DataModule2->Query1->SQL->Add("SELECT distinct Taijie FROM bk ");
DataModule2->Query1->Open();//
出现异常无结果返回某个字段找不到
Top
2 楼gxgl(zkw)回复于 2003-12-01 20:07:20 得分 0
最终目的找到某列的不同数值
但却出现错误!Top
3 楼matq2008(叶子.net)回复于 2003-12-01 21:08:42 得分 0
都应该有结果返回呀!
你先close()一下Top




