日期:2010-07-29  浏览次数:20878 次

<% @Language=VBScript %>
<% Option Explicit%>
 <html>
 <body>

现在时刻是::
  <%   dim a
  a=Time()
 response.write(a)'内部可以直接写函数的,
  %>
   今天为<%response.write(Date())%>
 <%
   dim weekday
   weekday=DatePart("w",Date())
   select case weekday
   case"1"
    response.write("<b>星期日</b><br>")
  response.write"<b>星期日</b><br"  '这两种都是正确的,第二种是第一中的简单书写
   response.write(weekday)  '这一种是写出变量的方法
    case "2"
      response.write"<b>星期一</b>"
   case "3"
      response.write"<b>星期二</b>"  
     case "4"
      response.write"<b>星期三</b>"
   case "5"
      response.write"<b>星期四</b>"  
     case "6"
      response.write"<b>星期五</b>"
   case "7"
      response.write"<b>星期六</b>"  
    end select
%>
<br>
  今天的日期是:<%response.write(date())%><br>
  现在时间是:<%response.write(Time()) %>
  <Br>
  今天的日期是: <% response.write(year(date()))%>
   今天的日期是: <% response.write(year(date)) %> 年 
                     <% response.write(month(date)) %> 月
                      <% response.write(day(date)) %>日
<BR>
   现在时间是<% response.write(Now()) %>   
   <BR>
 现在时间是<% response.write(hour(Now())) %> 时
           <% response.write(minute(Now())) %>分
           <% response.write(second(Now())) %>秒
  </body>
 </html>