?? 03_05.asp
字號:
<html>
<head>
<title>For...Next循環示例</title>
</head>
<body>
<%
'定義循環變量
Dim i
'定義用來表示當前年、月、日的變量
Dim CurYear,CurMonth,CurDay
'求取當前年、月、日
CurYear=Year(Date)
CurMonth=Month(Date)
CurDay=Day(Date)
%>
<form method="post" action="SelectDay.asp">
<p>請選擇查詢日期：
<select name="Year" size="1">
<%
For i = 1998 To 2008
%>
<option <% If i = CurYear Then Response.Write "selected" %>><% = i %></option>
<%
Next
%>
</select>
年
<select name="Month" size="1">
<%
For i = 1 To 12
%>
<option <% If i = CurMonth Then Response.Write "selected" %>><% = i %></option>
<%
Next
%>
</select>
月
<select name="Day" size="1">
<%
For i = 1 To 31
%>
<option <% If i = CurDay Then Response.Write "selected" %>><% = i %></option>
<%
Next
%>
</select>
日
<p>
<input type="submit" value="提交" name="btnSubmit">
<input type="reset" value="重置" name="btnReset">
</form>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -