2. 计算机
  3. 试题四 阅读以下说明，回答【问题1】至【问题2】，将解答填入答题纸对应的解答栏内。 【说明】 某系统在线讨论区采用ASP+Access开发，其主页如图4-1所示。 【问题2】 该网站在主页上设置了分页显示，每页显示10条留言

试题四 阅读以下说明，回答【问题1】至【问题2】，将解答填入答题纸对应的解答栏内。 【说明】 某系统在线讨论区采用ASP+Access开发，其主页如图4-1所示。 【问题2】 该网站在主页上设置了分页显示，每页显示10条留言

admin2015-11-30  29
问题 试题四
    阅读以下说明，回答【问题1】至【问题2】，将解答填入答题纸对应的解答栏内。
    【说明】
    某系统在线讨论区采用ASP+Access开发，其主页如图4-1所示。

【问题2】
  该网站在主页上设置了分页显示，每页显示10条留言，以下是该网站页面分页显示部分代码，请阅读程序代码，并将(9)～(15)的空缺代码补齐。
    <％
    Setrs=server．CreateObj ect(“adodb．recordset”)
      (9)  =“select*from cont  (10)  by id desc”
    rs．Open exect conn，1，1
    If rs．  (11)  Then
response．Write“ ；暂无留言!”
Else
rs．PageSize=  (12)  每页记录条数
iCount=rs．RecordCount  记录总数
iPageSize=rs．PageSize
maxpage=rs．PageCount
page=request(“page”)
If NotIsNumeric(page)Or page=“”Then
    page=1
Else
    page=  (13)  
End if
If page＜1 Then
    page=1
Else If page＞maxpage Then
    paqe=   (14)  
EndIf
rs．AbsolutePage=Page
If page=maxpage Then
    X=iCount-(maxpage-1)*iPageSize
Else
    X=  (15)  
End If
％＞
......
<／div>
(9)～(15)的备选答奏：
A．CInt(page)    B．exec    C．maxpage D．10
E．EOF    F．iPageSize    G．order
选项
答案(9)B (10)G (11)E (12)A (13)F (14)D (15)C
解析 首先调用Server对象的CreateObject方法，创建一个“connection对象”，把查询语句赋给exec，使用Recordset对象的Open方法用来打开数据库中的表。查询语句中使用order by id desc表示将查询结果降序排列。
    Setrs=server．Createobject(“adodb．recordset”)
    (9)exec=“select*from cont(10)order by id desc”
    rs．Open exec conn,1，1
    再查询记录集，如果记录集为空，则输出“暂无留言!”，否则用rs．PageSize=CInt(page)保存每页记录条数。CInt函数用于将字符型转为数值。
    Ifrs．(11)EOF Then
    response．Write“ ；暂无留言!”
    Else
    rs．PageSize=(12)CInt(page)  每页记录条数
    iCount=rs．RecordCount 记录总数
    下面的代码用于设置分页显示，每页显示10条留言。
    iCount=rs．RecordCount  记录总数
    iPageSize=rs．PageSize
    maxpage=rs．PageCount
    page=request(“page”)
    If NotIsNumeric(page)Or page=“”Then
    page=1
    Else
    page=(13)iPageSize
    End if
    If page＜l Then
    page=1
    Else If page＞maxpage Then
    paqe=(14)10
    Endlf
    rs．AbsolutePage=Page
    If page=maxpage Then
    x=iCount.(maxpage-1)*iPageSize
    Else
    x=(15)maxpage
    End If
转载请注明原文地址:https://kaotiyun.com/show/z6tZ777K
本试题收录于： 网络管理员下午应用技术考试题库软考初级分类
0

网络管理员下午应用技术考试

软考初级

相关试题推荐
随机试题
最新回复(0)