📄 chklogin.asp

📁 关于网络渗透技术的详细讲解
💻 ASP
字号:
<!--#include file=conn.asp-->
<!--#include file="top.asp"-->
<html>
<head>
<title>网上办税系统</title>
<link href="/images/style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
@import url("wsbs.css");
-->
</style>
</head>

<body style="margin:0px">
<div align=center>
<%top()%><br><br><br>
<%
	dim sql
	dim rs
	dim username
	dim password
	username=replace(trim(request("username")),"'","‘")
	password=replace(trim(Request("password")),"'","‘")

	set rs=server.createobject("adodb.recordset")
	sql="select * from user where password='"&password&"' and username='"&username&"'"
	rs.open sql,conn,1,1
 	if not(rs.bof and rs.eof) then
 		if password=rs("password") then
                        session("userid")=rs("id")
			session("username")=rs("username")
                        session("copname")=rs("copname")
                        session("faren")=rs("faren")
			session("flag")=rs("flag")
                        session("lbid")=rs("lbid")
			Response.Redirect "manage.asp"
 		else
			call Error
 		end if
	else
		call Error()
	end if

	sub Error()
    	response.write ""
    	response.write "    <table align='center' width='350' border='0' cellpadding='0' cellspacing='0' bordercolor='#999999'>"
    	response.write "      <tr bgcolor='#0082d6'> "
    	response.write "        <td colspan='2' height='28'> "
    	response.write "          <div align='left' style='margin-left:110px'><font color='white'>办税登陆确认身份失败</font></div>"
    	response.write "        </td>"
    	response.write "      </tr>"
    	response.write "      <tr> "
    	response.write "        <td colspan='2' height='23' bgcolor='#ffffcc'> "
    	response.write "          <div align='center' style='font-size:14px;color:#d90000'><br><br>"
    	response.write "      纳税人编号或密码错误! <br><br>"
    	response.write "        <input type=button onclick='history.go(-1)' class=button9 value=' 返回 '>"        
    	response.write "        <br><br><br></div></td>"
    	response.write "      </tr></table>" 
	end sub
	rs.close
	conn.close
	set rs=nothing
	set conn=nothing

%>
<table width="350" border="0" cellspacing="0" cellpadding="0" align=center>
                <tr> 
                  <td><img src="../IMAGES/bian.gif" width="100%" height="11"></td>
                </tr>
              </table>
<br><br><br>

<table width="300" border="0" cellspacing="0" cellpadding="0" align=center>
<%foot()%>
</table>
</body>
</html>
⌨️ 快捷键说明

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