% '日期函数 sub datetime dat=int(datediff("d",dateserial(2000,8,27),now) mod 7) response.write(formatdatetime(now,1))&" " select case dat case 0 response.write "星期天" case 1 response.write "星期一" case 2 response.write "星期二" case 3 response.write "星期三" case 4 response.write "星期四" case 5 response.write "星期五" case 6 response.write "星期六" end select end sub %>
|
|
|
|
|
|
||||||||||||||||
|
|
||||||||||||||||
Home | Products | Message Board | Contact Us
Copyright2004 Exportcn.com All-Rights Reserved
for any problems with this site contact us info@exportcn.com