2014-07-01 32 views
-1

例如:什麼是日期(格式:MM/DD/YYYY)1?得到的答覆是:2014年6月30日ASP經典 - 獲取最後幾個星期日期一天天數

天數是這樣的:

Monday=1 
... 
Friday=5 
Sunday=7 

因此,像這樣:

<% 
    dim GetPastDay 
    GetPastDay=1 
    '^^^ THIS WOULD MEAN THAT WE ARE LOOKING TO GET PAST/LAST MONDAYS DATE 
    ' AND IF WE WHERE TO REPLACE THE 1 WITH A 5 THEN IT WOULD MEAN PAST/LAST FRIDAY. 

    dim GetPastDate 
    '** S.O.S. -> I'M STUCK HERE! <- ** 
%> 

最後的結果將BE :

<% 
    Response.write "Last Date for day: " & GetPastDay & " was Date: " & GetPastDate 
%> 
+1

您已[已問這個問題](http://stackoverflow.com/questions/24499453/asp-classic-find-last-weeks-friday-or-any-day-using-days-as-數字1-7-1-mo)不久前... – Paul

+0

@Paul類似的,但我與你同在。不知道它需要另一個問題。 – Lankymart

回答

2
' Test each possible entry from Monday (1) to Sunday (7)... 
For i = 1 To 7 

    ' Calculate the number of days to subtract from today's date... 
    j = (8 - i) Mod 7 + 1 

    ' Get the date... 
    d = Date - j 

    ' Display the date and the weekday... 
    MsgBox "Date: " & d & vbCrLf & "Day: " & WeekDayName(WeekDay(d)) 

Next 
+2

使用'Mod()'的好方法,它是一個未被使用和多功能的函數。 – Lankymart

相關問題