国产探花免费观看_亚洲丰满少妇自慰呻吟_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 

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 贺兰县| 黄平县| 潼关县| 台东县| 镇坪县| 方山县| 通辽市| 凌海市| 绥德县| 平利县| 佳木斯市| 土默特左旗| 汶川县| 庆云县| 池州市| 奎屯市| 承德县| 江山市| 邵阳市| 紫阳县| 营山县| 宜丰县| 肥东县| 铁岭县| 泗阳县| 阿城市| 杭州市| 江门市| 五大连池市| 纳雍县| 杭锦后旗| 师宗县| 侯马市| 崇义县| 华坪县| 阳信县| 二连浩特市| 新巴尔虎左旗| 泌阳县| 漠河县| 定陶县|