📄 main.asp

📁 这是一个文章管理的网页源程序
💻 ASP
字号:
<!--#include file=conn.asp-->
<%
  	if session("admin")="" then
  		response.redirect "admin.asp"
  	end if
%>
<html>
<link rel="stylesheet" href="style.css">
<body leftmargin="10">
<br>
<table width="95%" border="0" cellspacing="0" cellpadding="0" bgcolor="#333333" align="center">
  <tr valign="middle"> 
    <td> 
      <table border="0" cellspacing="1" width="100%" align=center>
        <tr bgcolor="#FFFFFF"> 
          <td width="100%"> 
            <p align=center><b><font color="#000080">网站发布系统后台管理说明</font></b></p>
          </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="100%"> 
            <p><b>操作说明</b>：您好<u><%=session("admin")%></u>，您目前的权限是<b><%if session("flag")=1 then%>管理员，您可以审核所有专栏的文章<%else%><% if session("flag")=2 then%>高级用户<%else%>普通用户<%end if%><%end if%></b>。 
              <%if session("flag")=2 then%><%  Set rs= Server.CreateObject("ADODB.Recordset")
   sql="select * from Aclass where manage1 like '%"&session("admin")&"%' or manage2 like '%"&session("admin")&"%' or manage3 like '%"&session("admin")&"%' or manage4 like '%"&session("admin")&"%' order by classid desc"
	
	rs.open sql,conn,1,1
	%>而且是<font color=red><% while rs.eof =flase%><%=rs("class")%>,<%
		  rs.movenext
         wend
		 %></font>专栏的斑竹。 <%end if%><br>
              <br>
              如果您是首次登陆请阅读下列您所拥有的权限说明！点击左侧的连接，选择相关操作。<br>
              <br>
              1 添加文章：通过Web添加文章。 <br>
              <br>
              2 个人资料：修改用户的个人资料。<br>
              <br>
              3 修改文章：用户仅对自己所添加的文章进行修改编辑。<br>
              <br>
              <%if session("flag")<3 then%> 4 文章审核：斑竹对自己管理的栏目内待发表文章进行审核(同意其发表或建议修改)、也可以做修改或删除。<br>
              <br>
              <%if session("flag")<2 then%> 5 斑竹设定：每个以及栏目，最多可以设置四个斑竹，由管理员设定、高级用户担任<br>
              <br>
              6 栏目管理：对文章栏目进行添加修改删除。 <br>
              <br>
              7 用户管理：用户的增加修改删除。<br>
              <br>
              8 首页图片文章：管理首页图片文章。<br>
              <br>
              9 站内公告：发布站内文章公告。可添加、修改和删除。<br>
              <br>
              <%end if%><%end if%> <font color=red>注：为了系统的安全性，离开管理请点击&quot;退出系统&quot;退出。</font> 
            </p>
          </td>
        </tr>
        <tr bgcolor="#FFFFFF" align="center"> 
          <td width="100%">程序调试：半睡不睡  监制：婉莹,Copyright &copy; 2001 www.ie586.net, All Rights 
            Reserved </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<%rs.close
set rs=nothing
conn.close
set conn=nothing%> 

</html>
⌨️ 快捷键说明

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