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

📄 system.asp

📁 社区天地图文系统(核心:尘缘雅境图文系统) 版本: 1.0 本系统是ASP+ACCESS环境下开发成功
💻 ASP
字号:
<!--#include file=conn.asp --><!--#include file=../include/config.asp --><!--#include file="../inc/config.asp"--><!--#include file="char.inc"--><!--#include file="chkuser.asp" -->


<%
IF request.cookies("KEY")<>"super" THEN
response.redirect "index_face.asp"
response.end
else
usernamecookie=CheckStr(request.cookies("UserName"))
passwdcookie=replace(trim(Request.cookies("passwd")),"'","''")
KEYcookie=replace(trim(request.cookies("KEY")),"'","''")
if usernamecookie="" or passwdcookie="" then
response.redirect "login.asp"
response.end
else
'判断用户的合法性
  set rs=server.createobject("adodb.recordset")
  sql="select * from admin where username='"&usernamecookie&"'"
  rs.open sql,conn,1,1
  if rs.eof and rs.bof then
             response.redirect "login.asp"
            response.end
         end if
  IF passwdcookie<>rs("passwd") THEN
          response.redirect "login.asp"
           response.end
      END IF
   '下面判断用户级别实际在有用户级别是都应该判断
   if KEYcookie<>rs("OSKEY") then
      response.redirect "index_face.asp"
      response.end
    end if
           rs.close
           set rs=nothing
END IF
END IF
response.buffer=true
Response.Expires=0

Set rs9 = Server.CreateObject("ADODB.Recordset")
sql9 ="SELECT * From system Order By id DESC"
RS9.open sql9,Conn,1,1
%>
<%if rs9("system")="1" or request.cookies("purview")="99999" then
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href=site.css rel=stylesheet>
<title><%=copyright%><%=version%>&nbsp;<%=ver%> - 系统设置</title>
</head>
<SCRIPT language="JavaScript" type="text/javascript">
// Begin color
      function color(color)
      {
        url = 'color.htm';
     window.open(url,color,"width=430,height=440,status=no,toolbar=no,menubar=no,resizable=no");
      }
    // End color-->
</script>
<body topmargin="0"><!--#include file=top.asp-->
<form method="post" action="systemsave.asp" name="system">
  <div align="center">
    <center>
      <table width="750" border="1" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="<%=rs9("border")%>">
        <tr> 
          <td colspan="2" height="24" width="100%" bgcolor=<%=rs9("m_top")%>> 
            <div align="center">网站属性设置</div></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24"><font color=red>*</font>网站名称:</td>
          <td height="24" align="left" width="453"> <input type="text" name="name" size="50" value="<%=rs9("name")%>" style="font-family: 宋体; font-size: 9pt"> 
          </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24"><font color=red>*</font>网站地址:</td>
          <td height="24" align="left" width="593"> http:// 
            <input type="text" name="xpurl" size="40" value="<%=rs9("xpurl")%>" style="font-family: 宋体; font-size: 9pt">
            / (指系统所在地址,如http://你的域名/news)</td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24"><font color=red>*</font>网管信箱:</td>
          <td height="24" align="left" width="453"> <input type="text" name="email" size="50" value="<%=rs9("email")%>" style="font-family: 宋体; font-size: 9pt"> 
          </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">版权说明:</td>
          <td height="24" align="left" width="453"> <font color="#000000"><b>[<%=rs9("Copyright")%><%=rs9("version")%>]</b></font></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">上传文件类型:</td>
          <td height="24" align="left" width="453"> <input type="text" name="UpFileType" size="50" value="<%=UpFileType%>" style="font-family: 宋体; font-size: 9pt"> 
            <font color="#FF0000">用小写“|”分开</font></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">上传文件大小:</td>
          <td height="24" align="left" width="453"> <input type="text" name="MaxFileSize" size="50" value="<%=MaxFileSize%>" style="font-family: 宋体; font-size: 9pt"> 
            <font color="#FF0000">K</font></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">留言本屏蔽词语:</td>
          <td height="17" align="left" width="453"> 
            <input name="byteType" type="text" style="font-family: 宋体; font-size: 9pt" value="<%=byteType%>" size="50">
            <font color="#FF0000">用小写“|”分开</font></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td align="right" bgcolor="#FFFFFF">浮动广告:</td>
          <td align="left"><select name="R_BG" size="1" style="font-family: 宋体; font-size: 9pt">
              <option <%if rs9("R_BG")<>"0" then%>selected<%end if%> value="1">启用</option>
              <option <%if rs9("R_BG")="0" then%>selected<%end if%> value="0">禁用</option>
            </select></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td height="18" align="right" bgcolor="#FFFFFF">广告图片地址:</td>
          <td align="left"><input type="text" name="R_TOP" size="50" value="<%=rs9("R_TOP")%>" style="font-family: 宋体; font-size: 9pt"></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td align="right" bgcolor="#FFFFFF">广告链接:</td>
          <td align="left"><input type="text" name="L_MAIN" size="50" value="<%=rs9("L_MAIN")%>" style="font-family: 宋体; font-size: 9pt"></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td align="right" bgcolor="#FFFFFF">广告说明:</td>
          <td align="left"><input type="text" name="R_MAIN" size="50" value="<%=rs9("R_MAIN")%>" style="font-family: 宋体; font-size: 9pt"></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" bgcolor="#FFFFFF"> <p align="right">
			兼职黑板报:</p></td>
          <td align="left" width="453"> 
			<textarea name="gg1" cols="67" rows="16" style="font-family: 宋体; font-size: 9pt" title=在这里输入本站的公告内容 onMouseOver="window.status='在这里输入本站的公告内容';return true;" onMouseOut="window.status='';return true;" ><%=rs9("gg1")%></textarea> 
			<br><font color="#FF00FF">直接在此编辑即可,你这里是怎么设计,前台就是如何显示</font></td>
        </tr>
        <tr bgcolor="#abb8d6"> 
          <td colspan="2" height="24" align="center" width="611" bgcolor=<%=rs9("m_top")%>>显示条数设置</td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">文章显示条数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="top_news" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("top_news")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">大类页面文章显示条数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="bigclassshownum" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("bigclassshownum")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">专题显示条数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="top_sp" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("top_sp")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">热门文章显示条数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="top_txt" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("top_txt")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">最新图文显示条数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="top_img" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("top_img")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">阅读文章页面评论条数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="reviewnum" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("reviewnum")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">图片JS文章调用数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="picnum" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("picnum")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">一般JS文章调用数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="newsnum" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("newsnum")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">用户排行榜显示数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="topuser" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("topuser")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="157" align="right" height="24">首页LOGO链接显示数:</td>
          <td height="24" align="left" width="453"> <select size="1" name="linkshownum" style="font-family: 宋体; font-size: 9pt">
              <%for i=1 to 30%>
              <option <%if rs9("linkshownum")=i then%>selected<%end if%> value="<%=i%>"><%=i%></option>
              <%next%>
            </select> </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td colspan="2" height="24" width="611"> <div align="center"> 
              <input type="submit" name="Submit" value="提交" style="font-family: 宋体; font-size: 9pt">
              <input type="reset" name="Submit2" value="重设" style="font-family: 宋体; font-size: 9pt">
            </div></td>
        </tr>
      </table>
    </center>
  </div>
</form>
</body>
</html><%rs9.close%>
<%else
response.redirect "index_face.asp"
response.end 
end if%>

⌨️ 快捷键说明

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