阅读下列说明,回答以下问题,将解答填入答题纸的对应栏内。 【说明】 某留言系统采用ASP+Access开发,其后台管理登录页面如图4-1所示。 以下是该后台管理登录页面login.asp的部分代码,请仔细阅读该段代码,根据图4.1将(1)~(9)的空缺

admin2014-05-07  17

问题 阅读下列说明,回答以下问题,将解答填入答题纸的对应栏内。
【说明】
某留言系统采用ASP+Access开发,其后台管理登录页面如图4-1所示。

以下是该后台管理登录页面login.asp的部分代码,请仔细阅读该段代码,根据图4.1将(1)~(9)的空缺代码补齐。

   
   
    <%
    If request.Form("submit")="管理登录"Then
    user name=request.Form("    (1)    ")
    password=request.Form(" (2)   ")
    verifycode=request.Form("  (3)  ")
    If user_name=""Then
    Call infoback("用户名不能为空!")
    End If
    Set  (4)  =server.CreateObj ect("adodb.recordset")
    sql="select*from administrator  (5)  user name=’"&user name&"’
    and password=’"&md5(password)&"’"
    rs.Open  (6)  ,conn,1,1
    If    (7)  rs.EOF Then
    session("user_name")=user_name
    response.redirect"information.asp"
    ElSe
    Call infoback("用户名或密码错误!")
    End If
    End  If
    %>
   
   
   

   

管理员登录</hl>
   


选项

答案(1)C或uname (2)A或pword (3)D或vcode (4)G或rs (5)B或where (6)H或sql (7)I或Not (8)E或reset (9)F或submit

解析 本问题考查html代码及asp编程的基础知识。根据图示网页及提供的程序代码,对于login.asp文档中的(1)~(3)空对应于程序后面的表单id属性值,(8)~(9)空可以在图中判断其表单类型值,(4)~(7)空是asp程序,用于创建数据库连接实例、sql查询语句、判断数据记录集合。所以代码应为如下:
       
   
   
    <%
    If request.Form("submit")="管理登录"Then
    user_name=request.Form("unamme")
    password=request.Form("pword")
    verifycode=request.Form("vcode")
    If user_name。”Then
    Call_infoback(”用户名不能为空!”)
    End If.
    Setrs=server.CreateObj ect("adodb.recordset")
    sql="select*from administratorwhere user_name=’"&user_name&"’and
    password=’"&md5(password)&"’"
    rs.Opensql,conn,1,1
    If Not rs.EOF Then
    session("user_name")=user_name
    response.redirect"information.asp"
    Else
    Call infoback("用户名或密码错误!")   
    End  If
    End  If
    %>
   
   
   
   

管理员登录</hl>
   

转载请注明原文地址:https://kaotiyun.com/show/kBtZ777K
0

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