⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 hk.asp

📁 1。超强文件读写锁定
💻 ASP
字号:
<%'创建时间:2004/07/04
'
'功能:用于代理前台登陆
%>
<!--#include file="Include/conn.asp"-->
<!--#include file="Include/md5.asp"-->

<%
'取随机数用来作验证码
 dim s
randomize timer
s=Int((8999)*Rnd +1000)
%>

<% 
session("A_name")=""
  session("A_password")=""
    session("relogin")=request.form("relogin")
	 
A_name=checkstr(request.form("A_name"))
A_password=checkstr(request.form("A_password"))
A_check=checkstr(request.form("A_check"))'获取验证码
if A_name<>"" and A_password<>"" then
	A_check2=Request.Form("A_check2")
		If A_check<>A_check2 Then
			Response.Write("<script language=javascript>alert('请输入正确的认证码!');history.go(-1);</script>")
			Response.End
		end if
'判断登陆是否跨站提交
server_vv=len(Request.ServerVariables("SERVER_NAME"))
server_v1=left(Cstr(Request.ServerVariables("HTTP_REFERER")),server_vv)
server_v2=left(Cstr("http://"&Request.ServerVariables("SERVER_NAME")),server_vv)
if server_v1<>server_v2 and server_v1<>"" and server_v2<>"" then
response.write("<script>alert('错误:禁止从站点外部提交数据!.')</script>")
response.end
end if
'''''''''''''''''''''''''
'判断登陆是否正确
set Log_rs=server.createobject("adodb.recordset")
Log_sql="select * from Agent where Agent_name='"&A_name&"' and Agent_password='"&A_password&"'"
Log_rs.open Log_sql,conn,1,3
if not (Log_rs.eof and Log_rs.bof) then
session("A_name")=Log_rs("Agent_name")
session("A_password")=Log_rs("Agent_password")
session("A_rank")=Log_rs("Agent_rank")
session("A_ip")=request.ServerVariables("REMOTE_ADDR")
session("A_relogin")=Log_rs("Agent_relogin")
Log_rs("Agent_fronttime")=now()
Log_rs("Agent_frontip")=request.ServerVariables("REMOTE_ADDR")
log_rs("Agent_relogin")=log_rs("Agent_relogin")+1
Log_rs.update

response.redirect "index_whole.asp"

else
Response.Write("<script language=javascript>alert('输入不正确!');history.go(-1);</script>")
response.end 
end if
end if
%>

<LINK href="images/mem_index.css" type=text/css rel=stylesheet>
<title>..::WelCome::..</title>

<BODY text=#000000 bgColor=#ffffff leftMargin=0 topMargin=0>
<TABLE height="100%" cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" background=images/index_bk.jpg border=0>
        <TBODY>
        <TR>
          <TD width="49%"></TD>
          <TD width="2%">
            <TABLE cellSpacing=0 cellPadding=0 width=770 border=0>
              <TBODY>
              <TR>
                <TD><IMG height=145 src="images/index_ph11.jpg" width=237></TD>
                <TD><IMG height=145 src="images/index_ph12.jpg" width=140></TD>
                <TD><IMG height=145 src="images/index_ph13.jpg" width=125></TD>
                <TD><IMG height=145 src="images/index_ph14.jpg" width=207></TD>
                <TD><IMG height=145 src="images/index_ph15.jpg" width=63></TD></TR>
              <TR>
                <TD><IMG height=126 src="images/index_ph21.jpg" width=237></TD>
                <TD><IMG height=126 src="images/index_ph22.jpg" width=140 useMap=#Map border=0></TD>
                <TD><IMG height=126 src="images/index_ph23.jpg" width=125 useMap=#Map2 border=0></TD>
                <TD background=images/index_ph24.jpg>
                <form name="form1" method="post" action="hk.asp">
                 <div align="center">
                   <center>
                 <TABLE cellSpacing=0 cellPadding=0 border=0 style="font-size: 9pt; border-collapse: collapse" bordercolor="#111111">
                    <INPUT type=hidden value=login name=action> 
                    <TBODY>
                    <TR>
                      <TD>用户名:</TD>
                      <TD>
                    <input name="A_name" type="text" class="unnamed1" id="A_name" size="13"></TD></TR>
                    <TR>
                      <TD>密&nbsp;&nbsp;码:</TD>
                      <TD>
                    <input name="A_Password" type="password" class="unnamed1" id="A_Password" size="13"></TD></TR>
                    <TR>
                      <TD>认证码</TD>
                      <TD><input name="A_check" type="password" class="unnamed1" id="A_check" size="4">
                    <span style="background-color: #99CCFF"><%=s%></span>
                    <input name="A_check2" type=hidden id="A_check2" value="<%=s%>" size=12 maxlength=20>
                  </TD></TR>
                    <TR>
                      <TD colspan="2" align="center"><input type="submit" name="Submit" value="提交"></TD>
                      </TR></FORM></TBODY></TABLE></center>
                </div>
                </TD>
                <TD><IMG height=126 src="images/index_ph25.jpg" width=63></TD></TR>
              <TR>
                <TD> </TD>
                <TD> </TD>
                <TD> </TD>
                <TD><IMG height=18 src="images/index_ph31.jpg" width=207></TD>
                <TD> </TD></TR></TBODY></TABLE></TD>
          <TD width="49%"></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE><MAP 
name=Map><AREA shape=RECT coords="64, 14, 123, 39" 
  href="indexhk.asp"></MAP><MAP name=Map2>
<AREA 
  shape=RECT coords="16, 14, 72, 37" 
href="hk.asp"></MAP></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -