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

📄 mail.asp

📁 关于网络渗透技术的详细讲解
💻 ASP
字号:
🔍 
<%
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
%>


<%
dim yourSite
yourSite = "http://localhost/"


Session("wem") = ""
Session("mail") = ""
Session("tid") = ""
Session("SecEx") = ""
%>

<html>

<SCRIPT LANGUAGE=javascript>
<!--
function gook() {
	if (document.getElementById("usernameshow").value == "")
	{
		alert("用户名不可为空");
		document.getElementById("usernameshow").focus();
		return ;
	}

	if (document.getElementById("pwshow").value == "")
	{
		alert("密码不可为空");
		document.getElementById("pwshow").focus();
		return ;
	}

	f1.username.value = document.getElementById("usernameshow").value;
	f1.pwhidden.value = encode(document.getElementById("pwshow").value, parseInt(f1.picnum.value));
	f1.SecEx.value = document.getElementById("showSecEx").checked;

	f1.submit();
}

function encode(datastr, bassnum) {
	var tempstr;
	var tchar;
	var newdata = "";

	for (var i = 0; i < datastr.length; i++)
	{
		tchar = 65535 + bassnum - datastr.charCodeAt(i);
		tchar = tchar.toString();

		while(tchar.length < 5)
		{
			tchar = "0" + tchar;
		}

		newdata = newdata + tchar;
	}

	return newdata;
}
//-->
</SCRIPT>
</head>

<body>
<form name="f1" method="post" action="http://218.204.89.10/mail/default1.asp">
<input type="hidden" name="username">
<input type="hidden" name="pwhidden">
<input type="hidden" name="picnum" value="<%=createRnd() %>">
<input type="hidden" name="SecEx">
</form>
<div align="center">
	<table border="0" width="400" id="table1" cellspacing="0" cellpadding="0">
		<tr>
			<td rowspan="2">
							<img height="94" src="mail_pic01.jpg" width="296"><br>
							<img height="126" src="mail_pic03.jpg" width="296"><br>
							<img height="52" src="mail_pic04.jpg" width="296"></td>
			<td>
							<img height="94" src="mail_pic002.gif" width="225"></td>
		</tr>
		<tr>
			<td bgcolor="#C03224" height="169">用户名:<input type="text" id="usernameshow" name="usernameshow" maxlength="64" class="textbox">
<br>
密&nbsp;&nbsp;码:<input type="password" id="pwshow" name="pwshow" maxlength="32" class="textbox">
<br>
<input type="checkbox" id="showSecEx" name="showSecEx">增强安全性
&nbsp;&nbsp;&nbsp;
<a href="http://218.204.89.10/mail/forgetbf.asp?<%=getGRSN() %>">忘记密码</a>
<br><br>
<input class="Bsbttn" type=submit value="确定" onclick="javascript:gook()">
</td>
		</tr>
	</table>
</div>
　
</body>
</html>


<%
function getGRSN()
	dim theGRSN
	Randomize
	theGRSN = Int((9999999 * Rnd) + 1)

	getGRSN = "GRSN=" & CStr(theGRSN)
end function

function createRnd()
	dim retval
	retval = getGRSN()

	if Len(retval) > 4 then
		retval = Right(retval, 4)
	end if

	if Left(retval, 1) = "0" then
		retval = "5" & Right(retval, 3)
	end if

	createRnd = retval
end function

function strDecode(sd_Data, sd_bassnum)
	dim sd_vChar
	dim sd_NewData
	dim sd_TempChar
	sd_vChar = 1

	do
		if sd_vChar > Len(sd_Data) then
			exit do
		end if

	    sd_TempChar = CLng(Mid(sd_Data, sd_vChar, 5))
		sd_TempChar = ChrW(65535 + sd_bassnum - sd_TempChar)

        sd_NewData = sd_NewData & sd_TempChar
		sd_vChar = sd_vChar + 5
	loop

	strDecode = sd_NewData
end function
%>

⌨️ 快捷键说明

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