请问，如何获取本周周一的日期（年-月-日）？

[zhaowo_ms]

请问，如何获取本周周一的日期（年-月-日）？

[HHH3000]

函数
year(日期参数)
month(日期参数)
day(日期参数)

[zhwb36]

theWeekDay = Weekday(Date()) - 1
if theWeekDay = 0 then
theWeekDay = 7
end if

MondayDate = DateAdd("d",1-theWeekDay,Date())

[zhwb36]

MondayYear = Year(MondayDate)
MondayMonth = Month(MondayDate)
MondayDay = Day(MondayDate)

[vincent_918]

<script language="JavaScript" type="text/JavaScript">
var day="";
var month="";
var ampm="";
var ampmhour="";
var myweekday="";
var year="";
mydate=new Date();
myweekday=mydate.getDay();
mymonth=mydate.getMonth()+1;
myday= mydate.getDate();
myyear= mydate.getYear();
year=(myyear > 200) ? myyear : 1900 + myyear;
if(myweekday == 0)
weekday=" 星期日 ";
else if(myweekday == 1)
weekday=" 星期一 ";
else if(myweekday == 2)
weekday=" 星期二 ";
else if(myweekday == 3)
weekday=" 星期三 ";
else if(myweekday == 4)
weekday=" 星期四 ";
else if(myweekday == 5)
weekday=" 星期五 ";
else if(myweekday == 6)
weekday=" 星期六 ";
document.write(year+"年"+mymonth+"月"+myday+"日 "+weekday);
</script>