📄 typeadmin.asp

📁 很好的企业网站管理系统!可以适应各种不同的小型企业!
💻 ASP
字号:
<html>
<head>
<title>管理中心 -晓宇听幽 网站内容管理系统</title>
<meta copy="程序制作：xoyu（QQ：5964887）www.xoyu.com">
<link rel="stylesheet" href="admin.css" type="text/css">
</head>

<!--#include file="check.asp"-->
<!--#include file="mdb_path_user.asp"-->
<%
'#################################################################
'#  晓宇听幽网站内容管理系统(xoYu CMS)
'# 
'#  版权所有: 晓宇听幽工作室
'#
'#  制作人  :  xoyu(晓宇)            
'#           
'#  主页地址: http://www.xoYu.com	    晓宇听幽工作室
'#  论坛地址: http://www.xoYu.com/bbs/	晓宇听幽讨论区
'#
'#【版权声明】
'#################################################################
'# 本软体为共享软体(shareware)提供个人网站免费使用，请勿非法修改,
'# 转载，散播，或用于其他图利行为，并请勿删除版权声明。
'# 如果您的网站正式起用了这个脚本，请您通知我们，以便我们能够知晓！
'# 如果可能，请在您的网站做上我们的链接，希望能给予合作。谢谢！
'#################################################################
'# 程序名称：晓宇听幽网站内容管理系统·网站内容管理系统
'# 英文名称：xoYu News 2004 Professional For xoYu CMS
'# 程序创建时间：2003-7-10
'# 程序完成时间：2003-9-11
'# 最后修改时间：2003-11-15
'#################################################################
'# 请您尊重我们的劳动和版权，不要删除以上的版权声明部分，谢谢合作
'# 如有任何问题请到我们的论坛(http://www.xoyu.com/bbs/)告诉我们。 
'#################################################################
user=Request.cookies("xoYuStudioUserName")
if xoYuStudioAdminDj=0 then SF="普通会员"
if xoYuStudioAdminDj=1 then SF="认证会员"
if xoYuStudioAdminDj=2 then SF="栏目管理员"
if xoYuStudioAdminDj=3 then SF="系统管理员"
if xoYuStudioAdminDj=4 then SF="超级管理员"

if user<>"" then
  user=replace(user," ","+++ close")
else
  response.write("<li>您没有进入本页面的权限,本次操作已被记录!<br><li>如果你是本站会员请先<a href=login.asp target=_top>登陆</a>后进入.")
  response.end
end if
server_vv=len(Request.ServerVariables("SERVER_NAME"))
server_v1=left(Cstr(Request.ServerVariables("HTTP_REFERER")),server_vv)
server_v2=left(Cstr("http://"&Request.ServerVariables("SERVER_NAME")),server_vv)
if server_v1<>server_v2 and server_v1<>"" and server_v2<>"" then
response.write("<script>alert('错误：禁止从站点外部提交数据!.')</script>")
response.end
end if

set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select * from UserInfo where user='"&user&"'",conn,1,2
if rs.eof then
xoYuStudioMsg="错误:"&user&"用户资料读取错误,请重新登陆!"
else
face=rs("face")
email=rs("email")
oicq=rs("oicq")
homepage=rs("homepage")
sex=rs("sex")
face=rs("face")
qm=rs("qm")
end if
rs.close
set rs=nothing  
conn.close  
set conn=nothing
%>
<table width="95%" border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
<tr> 
<th width="100%" class="tableHeaderText" colspan=2 height=25>文章栏目管理
</th>
</tr>
<tr> 
<td width="100%" class=forumHeaderBackgroundAlternate colspan=2 height=25>欢迎用户<%=xoYuStudioAdminName%>登陆 
晓宇听幽后台进行管理&nbsp;   
<a href="edit.asp">(修改用户的资料)</a></td>  
</tr>  
<tr>  
<td class="forumrow" colspan=2>  
<table border="0" width="100%" height="104">  
  <tr>  
    <td width="26%" height="100" valign="middle">  
    <p align="center"><img border="0" src="images/admin.jpg"></td>
    <td width="74%" height="100" valign="middle">
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1" height="83">
       <tr>
        <td width="100%" height="20">用户等级：<%=SF%></td>
      </tr>
      <tr>
        <td width="100%" height="21">用户名：<%=xoYuStudioAdminName%></td>
      </tr>
      <tr>
        <td width="100%" height="21">E-mail：<%=email%></td>
      </tr>
      <tr>
        <td width="100%" height="21">QQ：<%=oicq%></td>
      </tr>
      <tr>
        <td width="100%" height="21">个人主页：<%=homepage%></td>
      </tr>
            <tr>
        <td width="100%" height="21">性别：<%=sex%></td>
      </tr>
            </table>
    　</td>
  </tr>
  <tr> 
<td width="100%" class=forumHeaderBackgroundAlternate colspan=2 height=25>用户栏目管理
</td>
</tr>
  <tr> 
<td width="100%"colspan=2 height=25>
<%
if xoYuStudioAdminDj=2 then
types=split(xoYuType,",")
     s=ubound(types)
     for k=0 to s
     typel=typel&"<a href=""info_sortLB.asp?id="&types(""&k&"")&""">管理目录察看("&k+1&")</a><br>" 
     next
     %>
<%=typel%>
<% else
thistype="<a class=xoYuNewsSort href=html_listLB.asp>进入文章管理页面</b></a>"
%>
<%=thistype%>
<% end if %>
</td>
</tr>
</table>
</td>
</tr>
⌨️ 快捷键说明

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