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

📄 main.asp

📁 这个论坛也不错.适合做毕业设计的
💻 ASP
字号:
<!--#INCLUDE FILE="../config.asp" -->
<html>
<head>
<style>
.sft {  font-family: "宋体"; font-size: 9pt; color: #CC0099}
.sfh {  font-family: "宋体"; font-size: 9pt; color: #ffffff}
</style>
</head>
<body class="sft">
<br><br><br>
<% if Request.QueryString("mode")="doit" then
set my_conn= Server.CreateObject("ADODB.Connection")
my_Conn.Open ConnString
strsql = "select SFAdmin_Name, SFAdmin_Password from SFAdmin"
set rs = my_conn.Execute (strSQL)
Session("SFAdmin_Name")=Request.Form("user")
Session("SFAdmin_Password")=Request.Form("pass")
if (Session("SFAdmin_Name")=rs("SFAdmin_Name")) and (Session("SFAdmin_Password")=rs("SFAdmin_Password")) then%>
  <table align="center"  bgcolor="#333333" border="0" width=300 cellspacing="1" cellpadding="3" class="sft">
  <tr><td bgcolor="#b4609d" class="sfh" align="center">登录成功</td></tr>
  <tr><td bgcolor="#f7f7f7" width="30%">*当前时间:<%=now()%></td></tr>
  <tr><td bgcolor="#f7f7f7" width="30%">*您的IP:<%=Request.ServerVariables("REMOTE_ADDR")%></td></tr>
  <tr><td bgcolor="#f7f7f7" width="30%">*您的计算机名称:<%=Request.ServerVariables("REMOTE_HOST")%></td></tr>
  <tr><td bgcolor="#f7f7f7" width="30%">*服务器名称:<%=Request.ServerVariables("SERVER_NAME")%></td></tr>
  <tr><td bgcolor="#f7f7f7" width="30%">现在您可以从左边列表中选择要对论坛进行的设置</td></tr>
  </table>
<%
else
Response.Write "<P align=center>管理员名称或密码错误!</p>"
end if
my_conn.Close
set my_Conn = nothing
set rs = nothing
else
Session("SFAdmin_Name")=""
Session("SFAdmin_Password")=""
%>
<form action="main.asp?mode=doit" method=post>
<input type=hidden name="topic_id" value="<%=Request.QueryString("topic_id") %>">
<input type=hidden name="forum_id" value="<%=Request.QueryString("forum_id") %>">
<input name="forum_title" type="hidden" value="<%=Request.QueryString("forum_title") %>">
<table align="center"  bgcolor="#333333" border="0" width=300 cellspacing="1" cellpadding="3" class="sft">
<tr><td bgcolor="#b4609d" colspan=2 class="sfh" align="center">论坛管理员登录</td></tr>
<TR><TD bgcolor="#f7f7f7" width="30%" align="right">用户名:</td>
<TD bgcolor="#f7f7f7" width="70%"><input type=text name="user" size=20 value="<%=Request.Cookies("User")("Name")%>"></td>
<TR><TD bgcolor="#f7f7f7" align="right">密码:</td>
<TD bgcolor="#f7f7f7"><input type=password name="pass" size=20 value="<%=Request.Cookies("User")("Pword")%>"></td>
<TR><TD bgcolor="#f7f7f7" colspan=2 align=center><Input type=submit value="确定"></TD></TR>
</form></table></body></html><%end if%>

⌨️ 快捷键说明

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