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

首頁 > 編程 > ASP > 正文

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

2024-05-04 11:00:25
字體:
供稿:網(wǎng)友

復制代碼 代碼如下:
td=date()
'此次為設(shè)置當前日期,主要是為了調(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ā)表
主站蜘蛛池模板: 湟源县| 腾冲县| 甘洛县| 肃南| 英吉沙县| 高要市| 凤阳县| 丰原市| 荔波县| 林西县| 呼伦贝尔市| 饶平县| 环江| 简阳市| 聊城市| 长岭县| 许昌县| 积石山| 临城县| 满洲里市| 芒康县| 博湖县| 永仁县| 怀柔区| 景宁| 绵竹市| 绍兴县| 安陆市| 桦甸市| 祥云县| 德清县| 八宿县| 新乐市| 泌阳县| 开原市| 永安市| 温州市| 闻喜县| 奉贤区| 广河县| 洪湖市|