% Dim pageId pageId = request("page") If pageId<>"" Then If Not IsNum(pageId) Then Response.Write("參數(shù)異常,請重新訪問!") Response.End End If End If %> <% Dim classId classId = request("classid") If classId<>"" Then If Not IsNum(classId) Then Response.Write("參數(shù)異常,請重新訪問!") Response.End End If End If %> <% Dim boardId boardId = request("boardid") If boardId<>"" Then If Not IsNum(boardId) Then Response.Write("參數(shù)異常,請重新訪問!") Response.End End If End If %>
No information
<%else rsp.absolutepage = ipagecurrent irecordsshown = 0 %> <% i=0%> <%do while irecordsshown