<%
username=replace(trim(request.form("username")),"'","")
userpassword=replace(trim(request.form("userpassword")),"'","")
shenfen=replace(trim(request.form("shenfen")),"'","")
userpassword=md5(userpassword)
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from usercenter where UserName='" & UserName & "' and shenfen='"&shenfen&"' and shenhe='是'"
rs.open sql,conn,1,1
if rs.eof or rs.bof then
%>
<script language="JavaScript">
history.back();
alert("请正确输入用户名、身份证号码!或者没有通过审核!")
</script>
<%
else
session("custName")=UserName
Response.Cookies( "custName ")=UserName
dim url,comeurl
url=Request.ServerVariables("HTTP_REFERER")
response.Redirect url
end if%>以上 是ASP 中 登陆代码
想在ASPX页中判断 用户登陆了没有 如何取得COOKICE中的值。
username=replace(trim(request.form("username")),"'","")
userpassword=replace(trim(request.form("userpassword")),"'","")
shenfen=replace(trim(request.form("shenfen")),"'","")
userpassword=md5(userpassword)
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from usercenter where UserName='" & UserName & "' and shenfen='"&shenfen&"' and shenhe='是'"
rs.open sql,conn,1,1
if rs.eof or rs.bof then
%>
<script language="JavaScript">
history.back();
alert("请正确输入用户名、身份证号码!或者没有通过审核!")
</script>
<%
else
session("custName")=UserName
Response.Cookies( "custName ")=UserName
dim url,comeurl
url=Request.ServerVariables("HTTP_REFERER")
response.Redirect url
end if%>以上 是ASP 中 登陆代码
想在ASPX页中判断 用户登陆了没有 如何取得COOKICE中的值。
注意,如果存有汉字一定要用SERVER.URLDECODE解码(ASP那边写cookie的时候要注意编码),如果不是,可以省略!
未将对象引用设置到对象的实例。
Response.Cookies( "custName ")=UserName
这样录入的 整个代码就在上面。。