response| Functions | collection
<% @Language =vbscript%>
<% Option explicit%>
<body>
Now the moment is::
<% Dim A
A=time ()
Response.Write (a) ' internal can write function directly,
%>
Today is <%response.write (Date ())%>
<%
Dim weekday
Weekday=datepart ("W", Date ())
Select Case Weekday
Case "1"
Response.Write ("<b> Sunday </b><br>")
Response.Write "<b> Sunday </b><br" ' Both are correct, the second is the first simple writing
Response.Write (Weekday) ' This is a way to write a variable
Case "2"
Response.Write "<b> Monday </b>"
Case "3"
Response.Write "<b> Tuesday </b>"
Case "4"
Response.Write "<b> Wednesday </b>"
Case "5"
Response.Write "<b> Thursday </b>"
Case "6"
Response.Write "<b> Friday </b>"
Case "7"
Response.Write "<b> Saturday </b>"
End Select
%>
<br>
Today's date is: <%response.write (date ())%><br>
Now the time is: <%response.write (Times ())%>
<Br>
Today's date is: <% Response.Write (Date ())%>
Today's date is: <% Response.Write (Year (date))%>
<% Response.Write (Month (date))%> month
<% Response.Write (date)%> Day
<BR>
The time is <% Response.Write (now ())%>
<BR>
Now time is <% Response.Write (Hour ())%>
<% Response.Write (Minute (now))%> points
<% Response.Write (Second (now))%> seconds
</body>