下面这段代码中,我想将rs("brlword")的值赋值给a,以备在其他网页中调用a的值(用户姓名),可是按下面两处红色处做了调用不到啊,请高手予以指导。
if founderr=true then
call error()
else
select case rs("bclass")'1正式用户 |0待审核 |2被锁定 |3版主
case 1
session("memberusername")=username
Response.Cookies("soonhostmember")("username") = username
Response.Cookies("soonhostmember")("password") = password
response.cookies("soonhostmember")("auid")=rs("id")
response.cookies("soonhostmember")("sex")=rs("bsex")
response.cookies("soonhostmember")("mail")=rs("bmail")
response.cookies("soonhostmember")("url")=rs("burl")
response.cookies("soonhostmember")("taketime")=rs("btime")
if rs("boicq")<>"" then
response.cookies("soonhostmember")("oicq")=rs("boicq")
end if
response.cookies("soonhostmember")("face")=rs("bface")
response.cookies("soonhostmember")("public")=savecookie
response.cookies("soonhostmember")("class")=1
if savecookie=1 then
response.Cookies("soonhostmember").Expires=Date+365
end if
a=rs("brlword")
response.redirect"successed.asp"
case 0
response.Cookies("soonhostmember")=now()
errmsg=errmsg+"<br>"+"<li>正在等待管理员审核!您现在还不能登陆"
call error()
response.end
case 2
response.Cookies("soonhostmember")=now()
errmsg=errmsg+"<br>"+"<li>您已经被管理员锁定,请联系管理员"
call error()
response.end
case 3
session("memberusername")=username
Response.Cookies("soonhostmember")("username") = username
Response.Cookies("soonhostmember")("password") = password
response.cookies("soonhostmember")("auid")=rs("id")
response.cookies("soonhostmember")("sex")=rs("bsex")
response.cookies("soonhostmember")("mail")=rs("bmail")
response.cookies("soonhostmember")("url")=rs("burl")
response.cookies("soonhostmember")("taketime")=rs("btime")
response.cookies("soonhostmember")("oicq")=rs("boicq")
'response.cookies("soonhostmember")("face")=rs("bface")
response.cookies("soonhostmember")("public")=savecookie
response.cookies("soonhostmember")("class")=3
session("membersoonhost")="passed"
if savecookie=1 then
response.Cookies("soonhostmember").Expires=Date+365
end if
a=rs("brlword")
response.redirect"successed.asp"
end select
end if