login.asp

Ajax留言本源代码 网上找到的一个源码,希望做网站的能用上.

<!--#include file="Function.asp"-->

<%
SiteHead "用户登录",0
dim Action
Action=request.querystring("Action")
if session(PreName&"_Leo_Login")<>"" and Action<>"LoginOut" then response.redirect("Index.asp"):response.end
%>
<table width="<%=SiteWidth%>" border="0" align="center" cellpadding="2" cellspacing="0">
<tr><td height="25" align="center" class="td">用户登录</td></tr>
<tr><td class="trHead">　</td></tr>
<tr><td height="240">
<%
if Action="CheckLogin" then
   if request.form("user")=Leo_User and request.form("pass")=Leo_Pass then
      response.write("<script language=javascript>alert('登录成功！');</script>")
      session(PreName&"_Leo_Login")="一起秀"
      response.redirect("Index.asp")
   else
      response.write("<script language=javascript>alert('您输入的用户名或密码不正确！');</script>")
      session(PreName&"_Leo_Login")=""
      response.redirect("Login.asp")
   end if
   
elseif Action="LoginOut" then
   if session(PreName&"_Leo_Login")<>"" then session(PreName&"_Leo_Login")=""
   response.write("<script language=javascript>alert('注销成功！');</script>")
   response.redirect("Login.asp")
else   
%>
    <table width="416" border="0" align="center" cellpadding="0" cellspacing="0">
    <form name="Login" method="post" action="?ChosePage=Default&Action=CheckLogin" onSubmit="return CheckLogin(this);">
    <tr><td height="25" align="center" class="td" colspan="2">管理员登录</td></tr>
    <tr><td class="trHead" colspan="2">　</td></tr>
    <tr><td align="center" height="36">	帐号：</td><td align="center"><input name="user" type="text" class="inputLogin" id="user" style="background-color:#ffffff;"></td></tr>
    <tr><td align="center" height="36">	密码：</td><td align="center"><input name="pass" type="password" class="inputLogin" id="password" style="background-color:#ffffff;"></td></tr>
    <tr><td align="center" colspan="2" height="36"><input type="submit" name="Submit" value="LOGIN" class="inputLogin"></td></tr>
    <tr><td height="25" align="center" class="td" colspan="2">0℃水晶‖<a href="http://5-2.com.cn/">蜗牛设计</a>‖<a href="http://17show.net/">一起秀</a></td></tr>
    </form>
    </table>

<%end if%>
</td></tr>
<tr><td class="trHead">　</td></tr>
<tr><td height="25" align="right" class="td"><%SiteBottom%></td></tr>
</table>

<script language="javascript">
function CheckLogin(frm){
	if(frm.user.value==""){
		alert("请先输入帐号!");
		return false;
	}else if(frm.password.value==""){
		alert("请输入密码!");
		return false;
	}else{
		frm.Submit.disabled=true;
		return true;
	}
}
</script>


</body>
</html>