adminchecked.asp

来自「Flash电子相册 v1.2 Build 1108完整版本下载」· ASP 代码 · 共 31 行

<%@ language=vbscript %>

<!--#include FILE="UpLoadClass.asp"-->
<!--#include file="md55.asp"-->
<%
usernames000=request.Form("usernames")
pwd000=request.Form("pwd")


UserPwd=md5(pwd000)

pwdsaved = right(LoadFile("pwd.txt"),32)

	session("loginCount")=1
	
if UserPwd=pwdsaved then
	session("flag")=2

else

	
response.write"<script>alert('密码不正确，请重新输入！');window.parent.close();</script>"
	'response.redirect "adminimgdir.asp"
response.end
end if%>

<SCRIPT>
//alert('<%=imglist%>');
//window.opener.location.reload();
window.parent.close();
</script>