% @LANGUAGE = VBScript %> <% Option Explicit Response.Expires = 0 Dim strWeek strWeek = Trim(Request.QueryString("week")) %>
Week
<% Response.Write strWeek %>
|
<%
If strWeek = "1" Then
Response.Write ""
ElseIf strWeek = "2" Then
Response.Write ""
ElseIf strWeek = "3" Then
Response.Write ""
ElseIf strWeek = "4" Then
Response.Write ""
ElseIf strWeek = "5" Then
Response.Write ""
ElseIf strWeek = "6" Then
Response.Write ""
ElseIf strWeek = "7" Then
Response.Write ""
ElseIf strWeek = "8" Then
Response.Write ""
ElseIf strWeek = "9" Then
Response.Write ""
ElseIf strWeek = "10" Then
Response.Write ""
ElseIf strWeek = "11" Then
Response.Write ""
ElseIf strWeek = "12" Then
Response.Write ""
ElseIf strWeek = "13" Then
Response.Write ""
ElseIf strWeek = "14" Then
Response.Write ""
ElseIf strWeek = "15" Then
Response.Write ""
ElseIf strWeek = "16" Then
Response.Write ""
ElseIf strWeek = "17" Then
Response.Write ""
ElseIf strWeek = "18" Then
Response.Write ""
ElseIf strWeek = "19" Then
Response.Write ""
ElseIf strWeek = "20" Then
Response.Write ""
ElseIf strWeek = "21" Then
Response.Write ""
ElseIf strWeek = "22" Then
Response.Write ""
ElseIf strWeek = "23" Then
Response.Write ""
ElseIf strWeek = "24" Then
Response.Write ""
ElseIf strWeek = "25" Then
Response.Write ""
ElseIf strWeek = "26" Then
Response.Write ""
ElseIf strWeek = "27" Then
Response.Write ""
ElseIf strWeek = "28" Then
Response.Write ""
ElseIf strWeek = "29" Then
Response.Write ""
ElseIf strWeek = "30" Then
Response.Write ""
ElseIf strWeek = "31" Then
Response.Write ""
ElseIf strWeek = "32" Then
Response.Write ""
ElseIf strWeek = "33" Then
Response.Write ""
ElseIf strWeek = "34" Then
Response.Write ""
ElseIf strWeek = "35" Then
Response.Write ""
ElseIf strWeek = "36" Then
Response.Write ""
ElseIf strWeek = "37" Then
Response.Write ""
ElseIf strWeek = "38" Then
Response.Write ""
ElseIf strWeek = "39" Then
Response.Write ""
ElseIf strWeek = "40" Then
Response.Write ""
End If
%>
|
Click here to print Close this window |