📄 ex02ans.asp
字号:
<%
Week = DatePart("w", Date() )
If Week = 1 Then ' 星期日
CWeek = "<FONT COLOR=Red>"
ElseIf Week = 7 Then ' 星期六
CWeek = "<FONT COLOR=Green>"
Else
Cweek = "<FONT COLOR=Blue>"
End If
%>
<!-- 以上是 VB Script 程序部分 -->
<!-- 以下是 HTML 标记部分 -->
<HTML>
<BODY>
今天是：
<%=Cweek%>
<%=WeekdayName(Week)%>
</FONT>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -