阅读下列说明，回答问题1和问题2，将解答填入答题纸的对应栏内。【说明】某系统在线讨论区采用ASP+Access开发，其主页如图4-1所示【问题2】（7分）该网站在主页上设置了分页显示，每页显示10条留言，以下是该网站页面分页显示部分代码，请阅读程序代码，并将（9）～（15）的空缺代码补齐。maxpage Then page= （14）End Ifrs.AbsolutePage = PageIf page = maxpage Then x = iCount - （maxpage -1） * iPageSizeElse x= （15）End If%>......（9）～（15）的备选答案：A．Clnt（page） B．exec C．maxpage D．10 E．EOF F．iPageSize G. order
阅读下列说明，回答问题1和问题2，将解答填入答题纸的对应栏内。
【说明】
某系统在线讨论区采用ASP+Access开发，其主页如图4-1所示
【问题2】（7分）
该网站在主页上设置了分页显示，每页显示10条留言，以下是该网站页面分页显示部分代码，请阅读程序代码，并将（9）～（15）的空缺代码补齐。
<%Set rs = server.CreateObject（“adodb.recordset”）（9） = “select * from cont （10） by id desc ”rs.Open exec, conn, 1, 1If rs. （11） Then response.Write “ 暂无留言！"Else rs.PageSize= （12） ’每页记录条数 iCount= rs.RecordCount’记录总数 iPageSize= rs.PageSize maxpage= rs.PageCount page= request（"page"） If Not IsNumeric（page） Or page=""Then page = 1 Else lPage = （13）End ifIf page<1 Then page = 1ElseIf page>maxpage Then page= （14）End Ifrs.AbsolutePage = PageIf page = maxpage Then x = iCount - （maxpage -1） * iPageSizeElse x= （15）End If%>......
（9）～（15）的备选答案：A．Clnt（page） B．exec C．maxpage D．10 E．EOF F．iPageSize G. order【说明】
某系统在线讨论区采用ASP+Access开发，其主页如图4-1所示
【问题2】（7分）
该网站在主页上设置了分页显示，每页显示10条留言，以下是该网站页面分页显示部分代码，请阅读程序代码，并将（9）～（15）的空缺代码补齐。
<%Set rs = server.CreateObject（“adodb.recordset”）（9） = “select * from cont （10） by id desc ”rs.Open exec, conn, 1, 1If rs. （11） Then response.Write “ 暂无留言！"Else rs.PageSize= （12） ’每页记录条数 iCount= rs.RecordCount’记录总数 iPageSize= rs.PageSize maxpage= rs.PageCount page= request（"page"） If Not IsNumeric（page） Or page=""Then page = 1 Else lPage = （13）End ifIf page<1 Then page = 1ElseIf page>maxpage Then page= （14）End Ifrs.AbsolutePage = PageIf page = maxpage Then x = iCount - （maxpage -1） * iPageSizeElse x= （15）End If%>......