ÕâÑùΪºÎʵÏÖ²»ÁËË«ÖØÑ­»·£¡

·ïǾ¡èõäõÑ

<%
Dim MyDate
MyDate="Article"
for i=1 to 5
For j=1 To 5
if j=i then
PageLoad="<strong>["&j&"]</strong>"
else
if j=1 then
PageLoad=PageLoad&"<a href="&MyDate&".htm>"
else
PageLoad=PageLoad&"<a href="&MyDate&"_"&j&".htm>"
end if
PageLoad=PageLoad&"<strong>["&j&"]</strong>"
PageLoad=PageLoad&"</a>"
end if
next
Response.Write PageLoad
Next
%>

É­ÁÖµÄÑÛÀá

[1][2][3][4][5]
[2][3][4][5]
[3][4][5]
[4][5]
[5]
½á¹ûÈçÏÂ:ÎÒÏëÈÃËûÿÐж¼ÏÔʾ5¸ö

¼ÙtpÀÏtpÁ·

ÎÊÌâÒѾ­½â¾ö!!