Dear All: 假設我有一個table 裡面只有一個 nDate 日期欄位, 可以透過sql 語法自動把兩個月內的日期塞進去嗎? 如: 12/01/2002 12/02/2002 : : 01/30/2003 01/31/2003

給你參考

procedure TForm1.Button1Click(Sender: TObject);
var
    i: Integer;
    StartDate, EndDate: Integer;
begin
    StartDate := Round( EncodeDate( 2002, 12, 1));
    EndDate := Round( EnCodeDate( 2003, 2, 1));
    Query1.SQL.Add( 'INSERT INTO TABLE1 VALUES (:NDATE)');
    for i := StartDate to EndDate - 1 do
    begin
        Query1.ParamByName( 'NDATE').Value := FormatDateTime( 'yyyy/mm/dd', i);
        Query1.ExecSQL;
    end;
end;

想不出其它方法..只有笨解

DECLARE @S DateTime
DECLARE @D DateTime
SET @S = '12/1/2001'
SET @D = '1/31/2002'    WHILE @S <= @D 
BEGIN
        INSERT [TABLE] (TableDate) Values (@S)
        SET @S = DateAdd(Day,@S,1)
END

發表人 - shpeng 於 2002/12/26 15:42:11

------
==取之於斯,用之於斯==