国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

asp實現(xiàn)本周的一周時間列表的代碼

2024-05-04 10:57:08
字體:
供稿:網(wǎng)友

復制代碼 代碼如下:

td=date()
'此次為設置當前日期,主要是為了調(diào)試方便,實際應用中可以使用當天日期..
str="一二三四五六日"
'生成具體是周幾的串,根據(jù)位置來取就可以了..
for x=1 to 7
'這個循環(huán)主要是判斷是最近的周一是哪天就可以了...
if td-weekday(td)+1+x=td then
'這個判斷是要讓當前日期顯示紅色,沒什么特別的價值..
response.write "<font color=red>周"&mid(str,x,1)&":"&FormatDateTime(td-weekday(td)+1+x,1)&"</font><br>"
else
response.write "周"&mid(str,x,1)&":"&FormatDateTime(td-weekday(td)+1+x,1)&"<br>"
end if
next

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 黑山县| 营山县| 贵州省| 息烽县| 治县。| 增城市| 伊川县| 乌审旗| 都匀市| 都兰县| 临沂市| 镇安县| 天峻县| 罗山县| 长兴县| 威海市| 巢湖市| 卓尼县| 唐河县| 台中市| 勐海县| 五台县| 当雄县| 固镇县| 汉源县| 鄂温| 大安市| 平原县| 若尔盖县| 固原市| 廊坊市| 酉阳| 鄄城县| 富阳市| 阜城县| 和林格尔县| 睢宁县| 修水县| 隆昌县| 汾西县| 如皋市|