28,390
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
blackfishliving 2006-02-27
- 打赏
- 举报
谢谢
KimSoft 2006-02-27
- 打赏
- 举报
meizz(梅花雪)，强！
sxsgssgs 2006-02-27
- 打赏
- 举报
<%
Dim MyDate, MyWeekDay
MyDate = date
MyWeekDay = Weekday(Cdate(MyDate))
response.write myweekday
%>
Dim MyDate, MyWeekDay
MyDate = date
MyWeekDay = Weekday(Cdate(MyDate))
response.write myweekday
%>
cow8063 2006-02-27
- 打赏
- 举报
来晚呀
sxsgssgs 2006-02-27
- 打赏
- 举报
<%
y=weekday(cdate(y))
select case y
case 1
stext="星期日"
case 2
stext="星期一"
case 3
stext="星期二"
case 4
stext="星期三"
case 5
stext="星期四"
case 6
stext="星期五"
case 7
stext="星期六"
end select
stext="今天是："&stext
%>
y=weekday(cdate(y))
select case y
case 1
stext="星期日"
case 2
stext="星期一"
case 3
stext="星期二"
case 4
stext="星期三"
case 5
stext="星期四"
case 6
stext="星期五"
case 7
stext="星期六"
end select
stext="今天是："&stext
%>
meizz 2006-02-27
- 打赏
- 举报
写个最精简的代码：
<SCRIPT LANGUAGE="JavaScript">
var s = "2006/02/28";
alert("今天星期"+"天一二三四五六".charAt(new Date(s).getDay()));
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript">
var s = "2006/02/28";
alert("今天星期"+"天一二三四五六".charAt(new Date(s).getDay()));
</SCRIPT>
