高手帮忙！！谢谢！

[lzd1024]

if 今天是星期一 then response.write"aaaaa"
if 今天是星期二 then response.write "bbbbbbb"
if这里怎么写啊？

[lzd1024]

我weekday(date)出来的数今天怎么是3啊。
不应该是2吗？

[yopy]

你可能用
if then
elseif then
......
elseif then
....
end if
end if
end if

[KimSoft]

<%
Dim intWeekDay

intWeekDay = WeekDay(Date)
Select Case intWeekDay
Case 1 '星期日
...
Case 2 '星期一
...
...
...
...
Case Else
End Select
%>



Weekday 函数
返回代表一星期中某天的整数。

Weekday(date, [firstdayofweek])

参数
date

可以代表日期的任意表达式。如果 date 参数中包含 Null，则返回 Null。

Firstdayofweek

指定星期中第一天的常数。如果省略，默认使用 vbSunday。

设置
firstdayofweek 参数有如下设置：

常数 值 描述
vbUseSystem 0 使用区域语言支持 (NLS) API 设置。
vbSunday 1 星期日
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六


返回值
Weekday 函数返回如下值：

常数 值 描述
vbSunday 1 星期日
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六


说明
下面例子利用 Weekday 函数得到指定日期为星期几：

Dim MyDate, MyWeekDay
MyDate = #October 19, 1962# ' 分派日期。
MyWeekDay = Weekday(MyDate) ' 由于 MyWeekDay 包含 6,MyDate 代表星期五。
要求