vbscript 一些基本语法

获取日期对象：Date
获取日期对象中的年：DatePart("yyyy",DateType)
获取月 m,日 d ,w 一周的日数,ww 周,h 小时,n 分钟 

获取字符串的长度：Len(String)

select case 的用法：
Dim Color, MyVar
Sub ChangeBackground (Color)
   MyVar = lcase (Color)
      Select Case MyVar
           Case "red"    document.bgColor = "red"
           Case "green"  document.bgColor = "green"
           Case "blue"   document.bgColor = "blue"
           Case Else     MsgBox "选择另一种颜色"
      End Select
End Sub