?? login.asp
字號:
<!--#include file="inc/conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file=inc/ipt.asp-->
<%if request("cnmai")="out" then
Response.cookies("cnmai")=""
Response.Redirect "index.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="供求信息,二手網,二手商品,電子商務,供求網站,免費發布供求信息,商業信息,貿易網,求購,求購信息,出售，供應,供求信息網，招商投資 生活服務 家電家居 旅游出行 招聘求職 房產信息
建材裝飾 煙酒副食 電腦網絡 餐飲酒店 醫藥保健 農林牧漁 安全防護 包裝紙張 辦公文教 電子通訊
紡織皮革 服裝服飾 工業機械 儀器儀表 交通運輸 車及配件 工藝禮品 文化藝術 冶金礦產 出版印刷 能源動力 環境保護
化工行業 玩具體育 園林綠化 廣告服務 商務服務 分類廣告 搜索引擎 企業行業黃頁 分類信息網 集市">
<title>會員登陸-<%=title%></title>
<SCRIPT language=javascript>
<!--
function CheckloginForm()
{
if(document.thisForm.username.value.length<1)
{
alert("登陸帳號沒有填寫!");
return false;
}
if(document.thisForm.password.value.length<1)
{
alert("密碼沒有填寫正確!");
return false;
}
}
//-->
</SCRIPT>
</head>
<body topmargin="0">
<!--#include file="topcnmai2.asp" -->
<div align="center">
<table border="0" width="760" id="table1" cellspacing="0" style="border-left:1px solid #CCCCCC; border-right:1px solid #CCCCCC; padding:1px; border-top-width:1px; border-bottom-width:1px" bgcolor="#FFFFFF" cellpadding="0" height="223">
<tr>
<td height="30" class=td5_muen></td>
</tr>
<tr>
<td>
<%
if request("login")="cnmai" then
dim username,password,rsper,sqlper,rscom,sqlcom,k,per,com,userip
per=Request.form("per")
com=Request.form("com")
if request.cookies("cnmai")("errs")="" then
k=0
else
k=request.cookies("cnmai")("errs")
end if
if request.cookies("cnmai")("errs")>5 then
Response.Write "<script language='javascript'>alert('您登陸的次數過多,系統保護中！');history.back();</script>"
response.end
end if
username=replace(trim(request("username")),"'","‘")
password=replace(trim(request("password")),"'","‘")
chkcnmai(username)
if nothaveChinese(username)=false then
Response.Write "<script language='javascript'>alert('用戶名為非中文');history.back();</script>"
end if
if per<>"" then
set rsper=server.createobject("adodb.recordset")
sqlper="select * from [user] where username='"&UserName&"' and password='"&password&"'"
rsper.open sqlper,conn,1,3
if rsper.eof then
Response.cookies("cnmai")("errs")=k+1
Response.Write "<script language='javascript'>alert('您的用戶名或密碼不正確！');history.back();</script>"
response.end
else
rsper("lasttime")=now()
rsper("jf")=rsper("jf")+jf_3
rsper("dlcs")=rsper("dlcs")+1
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip="" Then
userip=Request.ServerVariables("REMOTE_ADDR")
end if
rsper("ip")=userip
rsper.update
Response.cookies("cnmai")("username")=rsper("username")
Response.cookies("cnmai")("domain")=Request.ServerVariables("SERVER_NAME")
Response.cookies("cnmai")("per")=rsper("username")
Response.cookies("cnmai")("vip")=rsper("vip")
Response.cookies("cnmai")("id")=rsper("id")
end if
Response.Redirect "user.asp"
rsper.close
set rsper=nothing
closedb
else
set rscom=server.createobject("adodb.recordset")
sqlcom="select * from [com] where UserName='"&UserName&"' and password='"&password&"'"
rscom.open sqlcom,conn,1,3
if rscom.eof then
Response.cookies("cnmai")("errs")=k+1
Response.Write "<script language='javascript'>alert('您的用戶名或密碼不正確！');history.back();</script>"
response.end
else
rscom("lastdl")=now()
rscom("jf")=rscom("jf")+jf_3
rscom("dlcs")=rscom("dlcs")+1
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip="" Then
userip=Request.ServerVariables("REMOTE_ADDR")
end if
rscom("ip")=userip
rscom.update
Response.cookies("cnmai")("username")=rscom("username")
Response.cookies("cnmai")("com")=rscom("com")
Response.cookies("cnmai")("vip")=rscom("vip")
Response.cookies("cnmai")("domain")=Request.ServerVariables("SERVER_NAME")
Response.cookies("cnmai")("id")=rscom("id")
end if
Response.Redirect "com_user.asp"
rscom.close
set rscom=nothing
closedb
end if
else
%>
<form id="f1" name="thisForm" action="Login.asp" method="POST" style="line-height: 100%; margin-top: 0; margin-bottom: 0">
<div align="center">
<table width="510" cellpadding="0" style="border-collapse: collapse" id="table8" ><tr>
<td height="26" class=td2_muen align="center"><font color=white>會員登陸管理</font></tr>
<tr>
<td align="center">
<IMG src="image/a_1.gif" width="515" height="10"></tr>
<tr>
<td height="26" align="center" background="image/b_1.gif">登陸帳號：<input id="username2" maxLength="20" size="19" name="username"></tr>
<tr>
<td height="26" align="center" background="image/b_1.gif">登陸密碼：<input id="password2" type="password" maxLength="32" size="19" name="password"></tr>
<tr>
<td height="36" background="image/b_1.gif"><p align="center"> <input type="hidden" name="login" value="cnmai"><input onclick="javascript:return CheckloginForm();" type="submit" value="商家登陸" name="com" style="font-size: 10pt; ">
<input onClick="javascript:return CheckloginForm();" type="submit" value="個人登陸" name="per"> </td></tr><tr>
<td height="24" background="image/b_1.gif" align="center">
<a href="reg.asp">注冊新會員</a> <a href="getpass.asp">找回密碼</a></td></tr><tr>
<td height="24" background="image/b_1.gif">
<p align="center"><a href="addxinxi.asp?cnmai=free"><font color="red">
游客快速發布信息</font></a></td></tr><tr>
<td>
<IMG src="image/c_1.gif" width="515" height="9"></td></tr></table>
</div>
</form>
<%end if%></td>
</tr>
</table>
</div>
<!--#include file="endcnmai.asp"-->
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -