Question

设计一个ASP程序显示星期，日期，时间！根据星期几显示不同的问候语，问候语自己设定！

如题

Answer 1

<%
xiqi=weekday(now)
if xiqi=2 then
xiqi="一"
wenhouyu="今天星期一啦"
elseif xiqi=3 then
xiqi="二"
wenhouyu="今天星期二啦"
elseif xiqi=4 then
week="三"
wenhouyu="今天星期三啦"
elseif xiqi=5 then
xiqi="四"
wenhouyu="今天星期四啦"
elseif xiqi=6 then
xiqi="五"
wenhouyu="今天星期五啦"
elseif xiqi=7 then
xiqi="六"
wenhouyu="今天星期六啦"
elseif xiqi=1 then
xiqi="日"
wenhouyu="今天星期天啦"
end if

hours=hour(now)
if hours > 5 and hours < 11 then
hours="早上好！"
elseif hours > 11 and hours < 13 then
hours="中午好！"
elseif hours > 13 and hours < 16 then
hours="下午好！"
elseif hours > 16 and hours < 18 then
hours="傍晚好！"
elseif hours > 18 and hours < 23 then
hours="晚上好！"
elseif hours > 23 or hours < 5 then
hours="深更半夜的 该睡觉了！"
end if

if xiqi="一" then
response.write year(now)&"年"&month(now)&"月"&day(now)&"日 星期"&xiqi&" "&wenhouyu&" "&hour(now)&"点"&minute(now)&"分"&second(now)&"秒 "
response.write hours
Response.End()
else

if xiqi="二" then
response.write year(now)&"年"&month(now)&"月"&day(now)&"日 星期"&xiqi&" "&wenhouyu&" "&hour(now)&"点"&minute(now)&"分"&second(now)&"秒 "
response.write hours
Response.End()
.....
后面的自己依次类推
end if
end if
%>