?? index.asp
字號:
font-size: 9pt;
color: #FFFFFF;
}
td {
font-size: 9pt;
color: #FFFFFF;
text-decoration: none;
}
a:hover {
font-size: 9pt;
color: #FFFFFF;
text-decoration: none;
}
a:link {
font-size: 9pt;
color: #FFFFFF;
text-decoration: none;
}
a:visited {
font-size: 9pt;
color: #FFFFFF;
text-decoration: none;
}
-->
</style>
<script>
if (top.location==self.location){
top.location="?action=login"
}
</script>
</head>
<body bgcolor="#2d65dc" leftmargin="0" topmargin="0" oncontextmenu="return false" ondragstart="return false"
onselectstart="return false">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<TD width="10" background="images/TopBG_02.gif"><IMG SRC="images/TopBG_01.gif" onMouseDown="this.src='images/TopBG2_01.gif'" onMouseUp="this.src='images/TopBG_01.gif'" onMouseOut="this.src='images/TopBG_01.gif'"></TD>
<td background="images/TopBG_02.gif"> <a href="http://www.JoinBoard.Net" target="_blank">JoinBoard
控制面板(Ver2.3.0) </a></td>
<td width="180" background="images/TopBG_02.gif" align="right"><a href="http://bbs.joinboard.com/board.asp?BoardID=15" target="_blank">使用幫助</a> <a href="../" target="_blank">論壇首頁</a> </td>
<TD width="10" background="images/TopBG_02.gif"><div align="right"><IMG SRC="images/TopBG_03.gif" onMouseDown="this.src='images/TopBG2_03.gif'" onMouseUp="this.src='images/TopBG_03.gif'" onMouseOut="this.src='images/TopBG_03.gif'"></div></TD>
</tr>
</table>
</body>
</html>
<%
End Sub
'=================================================
Sub main()
%>
<!--#Include file = "BBSConfig.asp"-->
<!--#include file="Session.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>JoinBoard管理中心</title>
<link href="Style.css" rel="stylesheet" type="text/css">
<script>
if (top.location==self.location){
top.location="?action=login"
}
</script>
</head>
<body leftmargin="10" topmargin="0">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="23"> </td>
</tr>
<tr>
<td height="22"><strong>歡迎光臨JoinBoard管理員控制面板</strong></td>
</tr>
<tr>
<td height="22">軟件開發 <a href="http://YouMeng.Com" target="_blank"><font color="#000000">友盟工作室</font></a></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td height="22">在這里, 你可以定義你的論壇的所有屬性和特征. 請選擇左邊的論壇管理選項管理和設置你的論壇。</td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td valign="top">
<table width="349" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#2d65dc">
<tr>
<td bgcolor="#9bbaf6"><strong><font color="#000000">常用管理功能</font></strong></td>
</tr>
<tr>
<form name="form1" method="Get" action="user.asp">
<td height="30" bgcolor="#FFFFFF"> <input name="action" type="hidden" id="action" value="show">
快速查找用戶
<input name="username" type="text" id="username2"> <input name="groupID" type="hidden" id="groupID" value="0">
<input name="submit" type="submit" class="form1" value="搜索"> </td>
</form>
</tr>
<tr>
<td height="30" bgcolor="#FFFFFF">有用的鏈接
<select name="select1" size="1"
onChange="javascript:window.open(this.options[this.selectedIndex].value)">
<option selected> == 有用的鏈接 ==</option>
<option value="http://www.JoinBoard.Com/">JoinBoard 主頁</option>
<option value="http://bbs.JoinBoard.Com">JoinBoard 技術支持論壇</option>
</select> </td>
</tr>
</table></td>
</tr>
<tr>
<td height="50"><div align="center">
<%
response.write"Powered by: <a href=""http://www.joinboard.net"" target=""_blank"">JoinBoard</a> V2.3<br>"&_
"Copyright © <a href=""http://Youmeng.com"" target=""_blank"">YouMeng Studio.</a> 2003, 2004.<br>"
%>
</div></td>
</tr>
</table>
</body>
</html>
<%
set conn=nothing
%>
<%
End Sub
'========================
Sub login()
response.Buffer = true
%>
<!--#Include file = "BBSConfig.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="Style.css" rel="stylesheet" type="text/css">
<script>
if (top.location!=self.location){
top.location="?action=login"
}
</script>
<style type="text/css">
<!--
.bgfont1 {
font-size: 10pt;
color: #FFFFFF;
background-color: #000000;
letter-spacing: 3px;
width: 58px;
line-height: 16pt;
text-align: center;
}
-->
</style>
<title>登錄管理論壇</title>
</head>
<body leftmargin="0" topmargin="0">
<%
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
username = Trim(Request.Form("username"))
userpass = Trim(Request.Form("userpass"))
If Len(username)=0 Or Len(username)=0 Then
Response.write "<script>alert('用戶名和密碼均不可為空!');</script>"
Response.write "<script>window.location.href='index.asp?action=login';</script>"
Response.end
Else
if cstr(Trim(session("checkcode")))<>cstr(trim(request.Form("verifycode"))) Or trim(session("checkcode"))="" then
Response.write " <script>alert('您輸入的登錄驗證碼和系統所產生的不一致!')</script>"
Response.write "<script>window.location.href='index.asp?action=login';</script>"
Response.End
Else
username = SetSafeStr(Request.Form("username"))
userpass = SetSafeStr(Request.Form("userpass"))
username = replace(username,"'","")
userpass = replace(userpass,"'","")
userpass=Md5(userpass)
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="Select * From JBB_admin where adminname='"& username &"' And adminpass='"&userpass&"'"
rs.open sql,conn,1,1
If rs.eof and rs.bof then
rs.close
set rs=nothing
Response.write " <script>alert('用戶名或密碼錯誤，請重新輸入!')</script>"
Response.write "<script>window.location.href='index.asp?action=login';</script>"
Response.End
Else
Session("adminname") = username
Session("adminpass") = userpass
rs.close
set rs=nothing
response.Redirect("index.asp?action=Frame")
End if
End if
End if
else
%><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td> <form name="form1" method="post" action="index.asp">
<table width="260" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#2d65dc">
<tr>
<td colspan="2" bgcolor="#9bbaf6"> <div align="center">管 理 登 錄</div></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="80" bgcolor="#FFFFFF"> <div align="right">用戶名:</div></td>
<td> <input name="username" type="text" class="input2" id="username" size="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> <div align="right">密 碼:</div></td>
<td> <input name="userpass" type="password" class="input2" size="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> <div align="right">驗證碼:</div></td>
<td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="35%"><input type="text" name="verifycode" class="input2" size="8" maxlength="4">
</td>
<td width="65%"> <img src="../INC/checkcode.asp" width="40" height="10"></td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="2" bgcolor="#9bbaf6"> <div align="center">
<input name="Submit" type="submit" class="input2" value="登錄">
</div></td>
</tr>
</table>
</form></td>
</tr>
<tr>
<td >
<div align="center">
<%
response.write"Powered by: <a href=""http://www.joinboard.net"" target=""_blank"">JoinBoard</a> V2.3<br>"&_
"Copyright © <a href=""http://Youmeng.com"" target=""_blank"">YouMeng Studio.</a> 2003, 2004.<br>"
%>
</div>
</td>
</tr>
</table>
<% End if %>
</body>
</html>
<%
set conn = nothing
End Sub
%>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -