急！！！：怎样解析出中的年份、月份、天以及时段？在线等待中……

[yaoming2002]

<%now()%>时间是系统时间，显示如此：2002-7-21 19:36:30
怎么样解析呢？
请高手给出解法，或成熟思路。

[cmsoft]

为什么不用year(),date(),month()这些函数啊

[cmsoft]

用split("2002-7-21 19:36:30"," ")先拆成
2002-7-21和19:36:30
然后
split(2002-7-21,"-")再拆
同理时间也是

[希默软件]

DatePart 函数
请参阅
DateAdd 函数 | DateDiff 函数
要求
版本2
返回给定日期的指定部分。

DatePart(interval, date[, firstdayofweek[, firstweekofyear]])
Arguments
interval
必选项。字符串表达式表示要返回的时间间隔。有关数值，请参阅“设置”部分。
Date
必选项。要计算的日期表达式。
firstdayof week
可选项。指定星期中的第一天的常数。如果没有指定，则默认为星期日。有关数值，请参阅“设置”部分。
Firstweekofyear
可选项。指定一年中第一周的常数。如果没有指定，则默认为 1 月 1 日所在的星期。有关数值，请参阅“设置”部分。
设置
interval 参数可以有以下值：

设置 描述
yyyy 年
q 季度
m 月
y 一年的日数
d 日
w 一周的日数
ww 周
h 小时
n 分钟
s 秒

firstdayofweek 参数可以有以下值：

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

firstweekofyear 参数可以有以下值：

常数 值 描述
vbUseSystem 0 使用区域语言支持 (NLS) API 设置。
vbFirstJan1 1 由 1 月 1 日所在的星期开始（默认）。
vbFirstFourDays 2 由在新年中至少有四天的第一周开始。
vbFirstFullWeek 3 由在新的一年中第一个完整的周（不跨年度）开始。

说明
DatePart 函数用于计算日期并返回指定的时间间隔。例如使用 DatePart 计算某一天是星期几或当前的时间。

firstdayofweek 参数会影响使用“w”和“ww”间隔符号的计算。

如果 date 是日期文字，则指定的年度会成为日期的固定部分。但是如果 date 被包含在引号 (" ") 中，并且省略年份，则在代码中每次计算 date 表达式时，将插入当前年份。这样就可以编写适用于不同年份的程序代码。.

下面的示例利用 DatePart 函数获得日期并显示该日所在的季节。

Function GetQuarter(TheDate)
GetQuarter = DatePart("q", TheDate)
End Function

[yaoming2002]

to:cmsoft 有year()么？

我试试看啊，大家多出点主意！

[daehappy]

up!gz!

[cmsoft]

有啊，看看VBSCRIPT的帮助吧，里面有很多函数的

[evonne_feng]

vbscript中：
年：Year(Date())
月：Month(Date())
日：Day(Date())
小时：Hour(now())
分：Minute(now())
秒：second(now())
不支持微秒

[yaoming2002]

谢谢，谢谢！

[cmsoft]

给你SCRIPT的帮助文件吧，给EMAIL
上面有用法的