<%
if session("HYID")="" then
session("tzurl")= request.serverVariables("HTTP_REFERER")
response.redirect"http://www.alimama.com/login.asp"
response.end
end if %>
然后当用户登录后直接跳转到刚才要查看的session("tzurl")页面去
我正在学习还不经通,希望哪位大虾能帮忙完整一下,在此先谢谢了!
希望能帮我把那个登录后转向的代码告之.谢谢了!
response.redirect session("tzurl")呀
response.redirect session("tzurl")这个语句要放在登陆页的哪个位置啊..
是传送<form name="form2" method="post" action="/script/member/ComLogin_succeed.asp">这里还是<input class=rec_form2 name=Submit3 type=submit value=登录>这里啊?
请帮忙,谢谢了~~~
还是应该在进入登陆成功页面里ComLogin_succeed.asp再转向啊?
<%
dim HYID,Pwd,LastLogin
HYID = Trim (Request("LoginName"))
Pwd = Trim (Request("LoginPwd"))
set conn = server.createobject("adodb.connection")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="+Server.MapPath("da#ta3ba8s e/d#a 3t#65a.asa")
conn.Open DSNtemp
SQLstmt = "Select * From HYQY Where HYID ='" & HYID & "' and Pwd ='" & Pwd & "' and shenhe='1'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, conn, 1, 3
if rs.RecordCount=0 then
Response.Redirect "ComLogin_Error.asp"
Response.End
end if
session("username")="ok"
session("hyid")=rs("hyid")
session("add")=rs("add")
session("Pname")=rs("Pname")
session("zip")=rs("youbian")
session("tel")=rs("tel")
session("fax")=rs("fax")
session("email")=rs("email")
| 论坛热门帖子: | [lch203] 写得蛮好的linux学习笔记(10-21) [黑马制造] 学习java的30个目标(10-19) [笑傲股林] 做测试半年了,有点迷茫,应该再学些什么提高自己的测试水平和测试能力呢?(10-19) [udp8589] 大家用google的来吱一声? 用百度的~~也来报道下?(10-18) [沂偌掳兆] 本人总结的一些认为C++比较经典的书籍,希望对大家有用(10-18) |
| TAG标签: | 在线 答案 问题 方法 关于 rs session if 登录 页面 then |
注册
个人空间
