<% Set RS = Server.CreateObject("ADODB.Recordset") SQLStr = "SELECT * FROM TB_PlayerPic WHERE P_Show = 'Y' ORDER BY AutoID DESC" RS.Open SQLStr,conn,3 RS.PageSize = 9 %>
頁/共<% = RS.PageCount %>
 
<% For ipage = 1 to 3 If rs.EOF Then Exit For For i=1 To 3 %> <% rs.MoveNext If rs.EOF Then Exit For Next For j = i + 1 To 3 Response.Write("") Next %> <% Next %>
角色名稱
<%=rs("GameID")%>
伺服器
<%=rs("GameServer")%>
人氣指數
<%=rs("PlayerCount")%>