测试代码如下，请使用IE运行本示例
复制代码代码如下:
<script language="vbscript">
d=now
xqj=weekday(d)
msgbox xqj'输出数字，星期日为1，星期一为2...依次类推，星期六为7
msgbox weekdayname(xqj)
</script>
WEEKDAY 用途：返回某日期的星期数。在默认情况下，它的值为1(星期天)到7(星期六)之间的一个整数。
Weekday是Visual Basic和VBS中的一个函数，功能返回代表一星期中某天的整数。
语法
复制代码代码如下:
Dim x
x=Weekday(date[,FirstdayOfWeek])
x=Weekday(date[,FirstdayOfWeek])
参数
Weekday 函数的语法有以下参数：
| 参数 | 描述 |
| 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 | 星期六 |
WeekdayName用于返回一个字符串，表示一星期中的某天。
语法
WeekdayName(weekday, abbreviate, firstdayofweek)
WeekdayName函数语法有如下几部分：
weekday 必需的。数字值，表示一星期中的某天。该数字值要依赖于firstdayofweek设置中的设置值来决定。
abbreviate 可选的。Boolean值，表示星期的名称是否被缩写。如果忽略该值，缺省值为False，表明星期的名称不能被缩写。
firstdayofweek 可选的。数字值，表示一星期中第一天。关于其值，请参阅“设置值”部分。
firstdayofweek参数值如下：
常数 值 描述
vbUseSystem 0 使用本国语言支持 (NLS) API设置值。
vbSunday 1 星期日（缺省）。
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六