tiao
一般會員
發表:11 回覆:19 積分:6 註冊:2005-02-01
發送簡訊給我
|
要求輸入員工入厰日期,統計到今天為止入厰的天數。有以下幾個問題請大傢指導一下: 1. 每個月的總天數都不同,如1月有31天、2月有28/29天...有什么算法可以方便計算到今天為止的天數? 2. 我用access做數據庫,請問“入厰日期”這個字段用什么數據類型?日期?文本? 3. 在開髮齣來的程序中,輸入的“入厰日期”信息用什么格式比較方便計算呢?2005-01-01?2005/01/01?20050101?...或者其他? 痲煩各位指點,謝謝!
|
wyndog
資深會員
發表:7 回覆:362 積分:348 註冊:2004-10-12
發送簡訊給我
|
1. 直接減就可以了.....
[入廠日期] - Now() 取整數部份
2. 日期型態就行了
3. 2005/1/1 -> 如果是日期型態就很容易處理了
|
tiao
一般會員
發表:11 回覆:19 積分:6 註冊:2005-02-01
發送簡訊給我
|
wyndog前輩,妳好: 1.妳說的直接減,應該是Now()-【入厰日期】吧? 2.我在access裏麵設置日期的格式是2005-1-1,在軟件輸入的日期信息是不是也要符閤該格式? 3.假設現在的日期:2005-3-1,入厰日期:2005-2-27,計算得到的天數為3,對嗎? 謝謝!
|
l630521
資深會員
發表:15 回覆:349 積分:372 註冊:2003-02-17
發送簡訊給我
|
歹勢!插個花!
如果是Delphi 7,可以試試看
function DaysBetween(const ANow, AThen: TDateTime): Integer; Ian
|
wyndog
資深會員
發表:7 回覆:362 積分:348 註冊:2004-10-12
發送簡訊給我
|
引言:
1.妳說的直接減,應該是Now()-【入厰日期】吧?
對,不小心打錯了...||
引言:
2.我在access裏麵設置日期的格式是2005-1-1,在軟件輸入的日期信息是不是也要符合該格式?
這個要試試看
2005/1/1 這種格式,確定是可行的
2005-1-1 好像會有點怪怪的
引言:
3.假設現在的日期:2005-3-1,入厰日期:2005-2-27,計算得到的天數為3,對嗎?
會得到 2 (2/28 & 3/1 二天)
所以,如果 2/27 要算的話,要記得 1
|
tiao
一般會員
發表:11 回覆:19 積分:6 註冊:2005-02-01
發送簡訊給我
|
引言:
歹勢!插個花!
如果是Delphi 7,可以試試看
function DaysBetween(const ANow, AThen: TDateTime): Integer; Ian
我用DatsBetween的時候老是齣錯,請給我一個實例,謝謝!
|
wyndog
資深會員
發表:7 回覆:362 積分:348 註冊:2004-10-12
發送簡訊給我
|
引言:
我用DatsBetween的時候老是齣錯,請給我一個實例,謝謝!
你要 uses DateUtils; 啊
EX: uses DateUtils; var
d1, d2: TDate;
diff: integer; begin
d1 := EncodeDate(2005, 2,27);
d2 := EncodeDate(2005, 3, 1);
diff := DaysBetween(d1, d2);
end;
|
tiao
一般會員
發表:11 回覆:19 積分:6 註冊:2005-02-01
發送簡訊給我
|
謝謝各位的幫助,我的問題已經得以解決暸!
|