<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart
application("i") = 0
End Sub
</SCRIPT>
每一次登录a.asp中时,每一交登录网页时使i+1
<%
application("i")=application("i")+1
%>
<p><select size="1" name="1">
<%
if application("i")=1 then
%>
<option>1</option>
<% else
if application("i")=2 then
<option>2</option>
<% else %>
<option>3</option>
<%
end if
end if
%>
</select></p>