用Adoquery怎么实现这个功能？
时间 品种 单价
2009-9-1 1号 10
2009-9-2 2号 20
2009-9-3 3号 30
2009-9-4 1号 15
2009-9-5 1号 18
2009-9-6 2号 25
2009-9-7 3号 35
2009-9-8 3号 39
可否生成一个临时表如下：
2009-9-5 1号 18
2009-9-6 2号 25
2009-9-8 3号 39
Adoquery中的sql怎么写啊 用Access?
[解决办法]
SELECT max(时间),品种,max(单价) from 表名 group by 品种
[解决办法]
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add
("select * from data where 时间='2009-9-5' or 时间='2009-9-6' 时间='2009-9-8'") ;
ADOQuery1->Prepared=true;
ADOQuery1->Open();
[解决办法]
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add
("select * from data where 时间='2009-9-5' or 时间='2009-9-6' or 时间='2009-9-8'") ;
ADOQuery1->Prepared=true;
ADOQuery1->Open();
下面资料供参考
ADOQuery用法- -
在查询和测试过程中，我将遇到的、正确的SQL语句汇总起来，并进行了分类整理，于是便有了这篇文章。之所以发布，主要是希望碰到类似问题的朋友不必再去翻书或者查英文帮助一类的东西，直接拿去用就行了。也算是给大家备个份、提个醒之类的东西吧，希望对大家以后的编程能起到一定的裨益。
一、建立数据库的语句：
ADOQuery->SQL->Add("Create database [database_name]")
二、建立数据表的语句：
1.不换行的方式：
ADOQuery->SQL->Add("Create Table [Table_Name]([Field_1][Type_1](Length_1) Not NULL,[Field_2][Type_2](Length_2),[Field_3][Type_3](Length_3) Not NULL)")
2.换行的方式：
ADOQuery->SQL->Add("Create Table [Table_Name]([Field_1][Type_1](Length_1) Not NULL,"+
"[Field_2][Type_2](Length_2),"+
"[Field_3][Type_3](Length_3) Not NULL)")
3.其中 [table_name] 可以用动态的方式书写：
...["+Dynamic_Table_Name+"]...
或者部分动态
...["Table_Name_Part_1"+Table_Name_Part_2+"]...
三、删除数据表的语句：
1. 删除只有以下唯一语句：
ADOQuery->SQL->Add("drop table [Table_Name]")
四、插入记录
1.一般法
ADOQuery->SQL->Add("Insert into table_name(Field_1,Field_2,...Field_N) Values(Field_1_Value,Field_2_Value,...Field_N_Value) where condition")
2.替换法
AnsiString InsertField,InsertValue;
InsertField=Field_1;
InsertValues=Field_1_value;
if(Edit_1->Text!="")
{
InsertField+=",Label_1->Caption";
InsertValues+="'"+Edit_1->Text+"'";
}
...
...
if(Edit_N->Text!="")
{
InsertField+=",Label_N->Caption";
InsertValues+="'"+Edit_N->Text+"'";
}
下面是SQL语句的写法：
ADOQuery->SQL->Add("Insert into Table_Name("+InsertField+") Values("+InsertValues+") where condition")
五、更新记录
1. 不换行法：
ADOQuery->SQL->Add("Update Table_Name Set Field_1='"+Edit_1->Text+"',Field_2='"+Edit_2->Text+"',...Field_N='"+Edit_N->Text+"' where condition")
2.判断条件换行法
ADOQuery->SQL->Add("Update Table_Name set Field_1='"+Edit_1->Text+"'")
if(Edit_2->Text!="")
{
ADOQuery->SQL->Add(",Field_2='"+Edit_2->Text+"'");
}
...
...
