【www.gdgbn.com--php常用代码】
这里是根据用户的选择是否允许把用户名密码保存到cookie里面哦,我们特别注意那代码蓝色的代码哦。
set rs=server.createobject("adodb.recordset")
exec="select * from yrwl_tb_admin where yhm=""&yhm&"""
rs.open exec,conn,1,1
if not rs.eof then
if setpwd(pass) <> rs("pass") then
dl = "0"
else
cs = rs("cs")
if isnull(cs) then cs = 0
cs = cs + 1
zhsj = rs("zhsj")
if isnull(zhsj) then zhsj = "第一次登陆"
session(sessionvalue&"zhsj") = zhsj
if jy="1" then
Response.cookies("bbsyhm") = yhm
Response.cookies("bbspass") = pass
else
Response.cookies("bbsyhm") = ""
Response.cookies("bbspass") = ""
end if
session(sessionvalue&"pass")=pass
session(sessionvalue&"yhm") = yhm
session(sessionvalue&"lxfs") = rs("lxfs")
session(sessionvalue&"sp") = rs("wz")
session(sessionvalue&"id") = cstr(rs("id"))
session(sessionvalue&"jb") = rs("jb")
session(sessionvalue&"qm") = rs("qm")
exec1 = "update yrwl_tb_admin set cs = "+cstr(cs)+",zhsj = ""+jdsj+"" where yhm = ""+yhm+"""
conn.execute exec1
exec1 = "insert into yrwl_tb_dlxx (yhm,sj,ck) values (""&yhm&"",""&jdsj&"","贴吧")"
conn.execute exec1
if cz = "index" then response.redirect "index.asp"
end if
else
dl = "0"
end if
if dl = "0" then%>
<script language="javascript">
alert("用户名或密码错!");
if("<%=cz%>"=="bg") window.location="index.asp";
window.location="tb_dl.asp";
</script>
<%else
rs.close
conn.close%>
<script language="javascript">
parent.window.location.href="index.asp";
//parent.window.frames["bbslx"].location.href="bbs_lx.asp";
////window.location = "bbs_list.asp";
</script>
<%end if