?? logging.asp
字號(hào):
<!--#include file="commond.asp" -->
<!--#include file="include/function.asp" -->
<!--#include file="include/md5code.asp" -->
<!--#include file="header.asp" -->
<body>
<table width="97%" height="300" border="0" cellpadding="0" cellspacing="0" align="center" class="lrtd" bgcolor="#FFFFFF" background="image/back.gif">
<tr>
<td width="158" class="rtd"> </td>
<td width="590"><br>
<%IF Request.QueryString("action")="logout" Then
Response.Cookies(CookieName)("memName")=""
Response.Cookies(CookieName)("memPassword")=""
Response.Cookies(CookieName)("memStatus")=""%><table width="95%" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td height="24" align="center" class="header">退出成功</td>
</tr>
<tr>
<td height="88" align="center" valign="middle" bgcolor="#FFFFFF" class="htd"><a href="index.asp">點(diǎn)擊進(jìn)入主頁(yè)</a></td>
</tr>
</table>
<%ElseIF Request.QueryString("action")="login" Then
Dim Login_Title,Login_Message
IF Request.Form("UserName")=Empty OR Request.Form("Password")=Empty Then
Login_Title="錯(cuò)誤信息"
Login_Message="請(qǐng)將信息輸入完整<br><a href='javascript:history.go(-1);'>請(qǐng)返回重新輸入</a>"
Else
Dim memLogin
Set memLogin=Conn.Execute("SELECT mem_Name,mem_Password,mem_Status FROM blog_member WHERE mem_Name='"&CheckStr(Request.Form("Username"))&"' AND mem_Password='"&md5(CheckStr(Request.Form("Password")))&"'")
IF memLogin.EOF AND memLogin.BOF Then
Login_Title="錯(cuò)誤信息"
Login_Message="用戶(hù)名與密碼錯(cuò)誤<br><a href='javascript:history.go(-1);'>請(qǐng)返回重新輸入</a>"
Else
Response.Cookies(CookieName)("memName")=memLogin("mem_Name")
Response.Cookies(CookieName)("memPassword")=memLogin("mem_Password")
Response.Cookies(CookieName)("memStatus")=memLogin("mem_Status")
Login_Title="登陸成功"
Login_Message="<a href='index.asp'>點(diǎn)擊進(jìn)入主頁(yè)</a>"
End IF
Set memLogin=Nothing
End IF%>
<div id="Layer3" style="position:absolute; left:5px; top:130px; width:780px; height:100px; z-index:3">
<table width="95%" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#5C599D">
<tr>
<td height="24" align="center" class="header"><%=Login_Title%></td>
</tr>
<tr>
<td height="60" align="center" valign="middle" bgcolor="#FFFFFF" class="htd"><%=Login_Message%></td>
</tr>
</table>
</div>
<%Else%>
<div id="Layer1" style="position:absolute; left:5px; top:130px; width:780px; height:100px; z-index:1">
<table width="95%" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#5C599D"><form name="Login" method="post" action="logging.asp?action=login">
<tr align="center">
<td height="24" colspan="2" class="header" colspan=2 nowrap>用戶(hù)登陸</td>
</tr>
<tr>
<td align="center" bgcolor="#FFFFFF">用戶(hù)：
<input name="username" type="text" id="username" size="16" maxlength="24"></td>
<td align="center" bgcolor="#FFFFFF">密碼：
<input name="password" type="password" id="password" size="16" maxlength="16">
</td>
</tr>
<tr>
<td colspan="2" align="center" bgcolor="#FFFFFF" colspan=2><input name="Login" type="submit" id="agree" value=" 登 陸 ">
<input name="Register" type="button" id="Register" onclick="javascript:document.location.href='register.asp';" value=" 注 冊(cè) ">
</td>
</tr></form>
</table>
</div>
<%End IF%>
<br></td>
</tr>
</table>
<div id="Layer2" align="center" style="position:absolute; top:240px; width:780px; height:100px; z-index:2">
<!--#include file="foot.asp"-->
</div>
</body>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -