計算天數不包含六日或國定假日 |
尚未結案
|
jimmyhuang
一般會員 發表:3 回覆:2 積分:1 註冊:2005-07-25 發送簡訊給我 |
|
a6475
高階會員 發表:67 回覆:230 積分:154 註冊:2002-09-15 發送簡訊給我 |
|
way888
初階會員 發表:32 回覆:76 積分:36 註冊:2005-05-31 發送簡訊給我 |
Hi jimmyhuang您好
function DayOfWeek(day: TDateTime):integer;這個函式對你不知有用否? 以下是我自己寫來判斷星期幾的函式,參考看看...
至於國定假日可能要自己動手寫code囉
function WeekNo(day: TDateTime):string;
begin
case DayOfWeek(day) of
1 : result:='日';
2 : result:='一';
3 : result:='二';
4 : result:='三';
5 : result:='四';
6 : result:='五';
7 : result:='六';
else result:='';
end;
end;
|
jimmyhuang
一般會員 發表:3 回覆:2 積分:1 註冊:2005-07-25 發送簡訊給我 |
對不起 , 因為不知道使用者會從一個月中的那天去做預約的動作 , 所以
我要判斷他是不是預約超過(31天) , 而這些日子之間到底有幾個 (六)(日)
要排除掉 , 所以想再請大大指點一下
引言: 不包含六日 = 今天 31 (31日內的六日) 所以只要用SQL找出六日共有幾天就可以了。 ..-----------βλμε------------.. |
way888
初階會員 發表:32 回覆:76 積分:36 註冊:2005-05-31 發送簡訊給我 |
use...... DateUtils function StartOfTheMonth(const A Value: TDateTime):TDateTime;該月起始日期
function EndOfTheMonth(const A Value: TDateTime):TDateTime;該月結束日期
function DaysInMonth(const A Value: TDateTime):word;該月有幾天 配合 function DayOfWeek(const A Value: TDateTime):word;
寫個迴圈就可計算出來了 例如要計算以今天為準當月有幾天不含六、日
var i,j :integer;
mydate :TDateTime;
.
.
j:=0;
mydate:=StartOfTheMonth(date());
for i:=1 to DaysInMonth(date()) do begin
if (DayOfWeek(mydate)<>1)and(DayOfWeek(mydate)<>7) then begin
j:=j 1;
end;
mydate:=mydate 1;
end;
|
jimmyhuang
一般會員 發表:3 回覆:2 積分:1 註冊:2005-07-25 發送簡訊給我 |
真是謝謝你 ~~~
引言: use...... DateUtils function StartOfTheMonth(const A Value: TDateTime):TDateTime;該月起始日期 function EndOfTheMonth(const A Value: TDateTime):TDateTime;該月結束日期 function DaysInMonth(const A Value: TDateTime):word;該月有幾天 配合 function DayOfWeek(const A Value: TDateTime):word; 寫個迴圈就可計算出來了 例如要計算以今天為準當月有幾天不含六、日 var i,j :integer; mydate :TDateTime; . . j:=0; mydate:=StartOfTheMonth(date()); for i:=1 to DaysInMonth(date()) do begin if (DayOfWeek(mydate)<>1)and(DayOfWeek(mydate)<>7) then begin j:=j 1; end; mydate:=mydate 1; end; |
taihao
一般會員 發表:1 回覆:13 積分:2 註冊:2005-11-02 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |