[说明]
某公司使用ASP开发商务网站，该商务网站具有商品介绍、会员管理、在线支付、物流管理等功能。该商务网站采用SQL Server数据库，数据库名为business，其中用户表名称为name，其结构如下表所示。
| 字段名 | 类型 |
| UserName | Char |
| Password | Char |
| Usergrade | Char |
该商务网站只对会员用户开放购物车模块，当非会员用户点击购物车模块的首页链接时，系统跳转至会员注册页面；会员用户点击购物车模块的首页链接时，直接进入购物车模块的首页。其中购物车模块的首页为main.asp，用户登录时的判断页面是ChkLogin.asp，会员注册页面为Register.asp。
1. ChkLogin.asp的部分代码如下，请在空(4)～(6)处填写正确的代码。
＜!--#include file=conn.asp--＞
＜%
username=replace(trim( (4) ("username")), "’", "")
sq1="select * from (5) where Password=’"＆password＆"’and
UserName=’"＆username＆"’"
rs.open sq1, conn, 1, 1
if (6) (ms.bof and ms.eof)then
if password=rs("Password")then
session("Username")=rs("UserName")
session("Usergrade")=ms("Usergrade")
%＞
2. main.asp的部分代码如下，请为空(7)～(8)选择正确的代码。
＜%
if (7) ＜＞"m" then
response. (8) "Register.asp"
end if
%＞
＜html＞
＜/html＞
(7)备选答案：
A．session("Username") B．session("Usergrade")
C．application("Username") D．application("Usergrade")
(8)备选答案：
A．cookie B．end
C．redirect D．write
参考答案：1．(4)request (5)name (6)not
2．(7)B．session("Usergrade") (8)C．redirect
解析：本问题考查ASP编码的基本方法。
用户登录时的判断页面是ChkLogin.asp，其作用在于当非会员用户点击购物车模块首页链接时，系统跳转至会员注册页面；会员用户点击购物车模块首页链接时，直接进入购物车模块的首页。另外，用户表名称为name，所以代码如下：
＜!--#include file=conn.asp--＞
＜%
username=replace(trim(request ("username")), "’", "")
sq1="select * from name where Password=’"＆password＆"’and
UserName=’"＆username＆"’"
rs.open sq1, conn,1,1
if not (rs.bof and rs.eof) then
if password=rs("Password")then
session("Username")=rs("UserName")
session(”Usergrade”)=ms(”Usergrade”)
%＞
配合ChkLogin.asp页面，购物车模块的首页main.asp需要对session("Usergrade")进行判断，其程序代码如下：
＜%
if session("Usergrade") ＜＞"m" then
response. redirect "Register.asp"
end it
%＞
＜html＞
＜/html＞