要按日期查询，2000分！

Question

什么意思?说清楚啊,,,
比如;
SELECT * FROM Table Where DayCode=:DayCode

Answer 1

select * from 表名 group by 日期 having 条件！

Answer 2

用的着2K分吗，直接Select * from xxx where 条件

Answer 3

select * from atable where date='20020626'

Answer 4

wzrlover(wzrlover) 说得对，用的着2K分吗？只有20分。

Answer 5

写一个function即可：
function getData(const xBeginDay,xEndDay: WideString):Integer; safecall;
var
  xSQL:String;
begin
  xSQL := 'Select * From $TableName Where Day1>= :xBeginDay and Day2 <= xEndDay and Other_Conditions';
  QryTemp.Close;
  QryTemp.SQL.Clear;
  QryTemp.SQL.Add(xSQL);
  QryTemp.ParamByName('xBeginDay').AsDate := StrToDate(xBeginDay);
  QryTemp.ParamByName('xEndDay').AsDate := StrToDate(xEndDay);
  QryTemp.Open;
  ReSult := QryTemp.RecordCount;
end;

Answer 6

WnEunfn(斯人不语) ,你写这么多我都看不懂！

Answer 7

写一个function即可：
function getData(const xBeginDay,xEndDay: WideString):Integer; safecall;
var
  xSQL:String;
begin
  xSQL := 'Select * From $TableName Where Day1>= :xBeginDay and Day2 <= xEndDay and Other_Conditions';//有两个参数的SQL语句，表示取两个参数间的数据，
  QryTemp.Close;//关闭TQurey控件
  QryTemp.SQL.Clear;//清空SQL属性
  QryTemp.SQL.Add(xSQL);//添加SQL
  QryTemp.ParamByName('xBeginDay').AsDate := StrToDate(xBeginDay);//添加参数1（开始日期）
  QryTemp.ParamByName('xEndDay').AsDate := StrToDate(xEndDay);//添加参数2（结束日期）
  QryTemp.Open;//查询
  ReSult := QryTemp.RecordCount;//返回记录数
end;//懂了吧

Answer 8

procedure getData(const BeginDate,EndDate: Tdatetime);
var
  xSQL:String;
begin
  xSQL:=' ';
 while BeginDate<=EndDate do
  begin 
 if BeginDate<>EndDate then
  xSQL := xSQL+'Select * From TableName Where FieldDate =BeginDate union'
 else
  xSQL := xSQL+'Select * From TableName Where FieldDate =BeginDate' 
 BeginDate:=BeginDate+1;
end;
end;

Answer 9

这是利用Function来实现Delphi中的查询的……
在这里，你必须为程序设立各数据组件的关系与设置：QryTemp: TQuery; 位于DataModule中
object RDM: TRDM //TRemoteDataModule的组件与关系
  OldCreateOrder = False
  OnDestroy = RemoteDataModuleDestroy
  Left = 195
  Top = 104
  Height = 305
  Width = 559
  object DB: TDatabase
    AliasName = 'ACCOUNT'
    DatabaseName = 'acct'
    LoginPrompt = False
    Params.Strings = (
      'USER NAME=ACCOUNT'
      'PASSWORD=ACCOUNT')
    Left = 56
    Top = 16
  end
  object QryMain: TQuery
    AutoCalcFields = False
    AutoRefresh = True
    DatabaseName = 'acct'
    SessionName = 'Session_4'
    SQL.Strings = ('select * from ASSDOCHED Where 1=2')
    Left = 56
    Top = 80
  end
  object PvdMain: TDataSetProvider
    DataSet = QryMain
    Constraints = True
    Left = 56
    Top = 144
  end
end
然后执行这个Function，将从数据库中获取对应天数的记录，这个记录集由你的SQL语句与传递的参数决定(在本函数中是写在xSQL 中)function getData(const xBeginDay,xEndDay: WideString):Integer; safecall;//xBeginDay,xEndDay是你要取得的记录的开始时间与结束时间，当然你也可以多设几个参数……
var
  xSQL:String;
begin
  xSQL := 'Select * From $TableName Where Day1>= :xBeginDay and Day2 <= xEndDay and Other_Conditions';//这是你要执行的查询，由你自已而定，":"后跟的是参数。在QryTemp.ParamByName('xBeginDay')中需要赋值的。  QryTemp.Close;
  QryTemp.SQL.Clear;
  QryTemp.SQL.Add(xSQL); //这是将你SQL 语句加入，准备执行。
  QryTemp.ParamByName('xBeginDay').AsDate := StrToDate(xBeginDay);
  QryTemp.ParamByName('xEndDay').AsDate := StrToDate(xEndDay);//这是将参数填值
  QryTemp.Open;//执行SQL,
  ReSult := QryTemp.RecordCount;//返回取得记录的条数,记录本身将储存在QryTemp中。
end;

Answer 10

floattofool (foolish)  到处骗人，还欠我969分！

Answer 11

with Query do
   begin
     Close;
     SQL.Clear;
     SQL.Add('select * from TableName');
     SQL.Add('where xsrjrq between :val1 and :val2');
     ParamByName('val1').DataType:=ftDate;
     ParamByName('val2').DataType:=ftDate;
     ParamByName('val2').asDate:=DateTimePicker2.Date;
     ParamByName('val1').AsDate:=DateTimePicker1.Date;
     Prepare;
     Open;
   end;

Answer 12

在SQL——PLUS里面查询看看就知道了啊

Answer 13

SELECT * FROM Table Where DayCode= '2002-6-25'

Answer 14

select * from table where 日期=day