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

首頁 > 編程 > ASP > 正文

asp實現本周的一周時間列表的代碼

2024-05-04 11:08:59
字體:
來源:轉載
供稿:網友
原理也相對簡單,就是利用date函數獲取日期,然后通過固定的字符串數組進行替換。
 
 
 

 

復制代碼代碼如下:

td=date() 
'此次為設置當前日期,主要是為了調試方便,實際應用中可以使用當天日期.. 
str="一二三四五六日" 
'生成具體是周幾的串,根據位置來取就可以了.. 
for x=1 to 7 
'這個循環主要是判斷是最近的周一是哪天就可以了... 
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 

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 锦州市| 元朗区| 丹凤县| 珠海市| 黔南| 卫辉市| 中超| 东兴市| 大关县| 建阳市| 洪江市| 高平市| 磴口县| 肥乡县| 瓮安县| 大悟县| 龙川县| 越西县| 达州市| 西平县| 丰城市| 濮阳县| 繁峙县| 页游| 邵武市| 洮南市| 宁波市| 阳西县| 犍为县| 平陆县| 乐昌市| 成武县| 阳信县| 增城市| 大洼县| 左贡县| 屏南县| 乳源| 封开县| 西华县| 鄢陵县|