📄 index.asp
字号:
Sub frame_main()%>
<%
if session(adminVar)="" then
response.write("<script>alert('你还没有登录!');</script>")
response.redirect("../index.asp")
response.end()
end if
Call admin_top()
serverInfo
Select Case LCase(Request.QueryString("action"))
Case LCase("batchDeleteFile")'批量删除附件
Call batchDeleteFile("../upfile/news/")
Case Else
End Select
table(5)
%>
<table width="100%" border="0" cellpadding="4" cellspacing="1" class="text table_border mainTable">
<tr>
<td height="26" colspan="2" align="center" valign="middle" class="td_titleT">操作向导指南</td>
</tr>
<tr class="td_bgcolor">
<td width="110" align="right" valign="middle">常规设置：</td>
<td width="*" valign="middle" style="line-height:18px;text-indent:18pt;">如果你是第一次使用，请从这里入手。点击左边管理导航菜单中的“<font color="#FF0000">常规管理</font>”--“<a href="admin_config.asp"><font color="#FF0000">网站设置</font></a>”，对你的网站的基本信息和参数进行你所需要的配置，这一栏还可以进行网站的一些日常管理。<br>
导航菜单：<a href="admin_config.asp"><font color="#00648A">网站设置</font></a> |
<a href="admin_tongji.asp"><font color="#00648A">访问统计</font></a> | <a href="admin_editmenu.asp"><font color="#00648A">菜单管理</font></a>
| <a href="admin_channel.asp"><font color="#00648A">频道管理</font></a> | <a href="admin_link.asp"><font color="#00648A">链接管理</font></a>
| <a href="admin_vote.asp"><font color="#00648A">投票管理</font></a> | <a href="admin_sms.asp"><font color="#00648A">短信管理</font></a>
| <a href="../guestbook.asp"><font color="#00648A">留言管理</font></a> | <a href="admin_wisdom.asp"><font color="#00648A">网站小贴士</font></a>
| <a href="admin_message.asp"><font color="#00648A">公告管理</font></a></td>
</tr>
<tr class="td_bgcolor">
<td align="right" valign="middle">栏目管理：</td>
<td valign="middle" style="line-height:18px;text-indent:18pt;">这里是您添加网站内容的主要功能菜单，本系统拥有的频道：<font color="#FF0000">文章频道</font>，<font color="#FF0000">新闻频道</font>，<font color="#FF0000">下载频道</font>，<font color="#FF0000">图片频道</font>，<font color="#FF0000">免费资源频道</font>等。在这里您可以对各栏目频道进行分类管理，内容的更新、修改、删除、网友发布内容的审核，以及相关评论的管理。在操作过程中请您一定要仔细看清楚各项的含义和参数的设置说明。<br>
各导航菜单请展开看左栏菜单。</td>
</tr>
<tr class="td_bgcolor">
<td align="right" valign="middle">用户/管理员管理：</td>
<td valign="middle" style="line-height:18px;text-indent:18pt;">
在这里你可以进行网站注册用户的，管理员各项权限配置的管理，以及密码资料的添加。<br>
第一次使用时，千万别忘记<a href="admin_user.asp?action=modifyPass"><font color="#FF0000">修改管理员密码</font></a>！<br>
导航菜单：<a href="admin_user.asp"><font color="#00648A">用户管理</font></a> |
<a href="admin/admin_user.asp?action=addUser"><font color="#00648A">添加新的用户</font></a>
| <a href="admin_user.asp?action=modifyPass"><font color="#00648A">管理员密码修改</font></a>
| <a href="admin_user.asp?action=adminList"><font color="#00648A">管理员管理</font></a>
| <a href="admin_user.asp?action=addAdminUser"><font color="#00648A">添加新的管理员</font></a><br>
</td>
</tr>
<tr class="td_bgcolor">
<td align="right" valign="middle">数据管理：</td>
<td valign="middle" style="line-height:18px;text-indent:18pt;">为了确保安全，可别忘了定期对数据库进行备份。你可在这里进行<a href="admin_data.asp"><font color="#FF0000">数据库备份</font></a>，<a href="admin_data.asp?action=restoredata"><font color="#FF0000">数据库恢复</font></a>，<a href="admin_data.asp?action=Compress"><font color="#FF0000">数据库压缩</font></a>（可以减少磁盘占用空间），<a href="admin_sql.asp"><font color="#FF0000">SQL语句操作执行</font></a>，以及<a href="admin_data.asp?action=checkServerObject"><font color="#FF0000">服务器探测</font></a>。<br>
导航菜单： <a href="admin_data.asp"><font color="#00648A">数据库备份</font></a> |
<a href="admin_data.asp?action=restoredata"><font color="#00648A">数据库恢复</font></a>
| <a href="admin_data.asp?action=Compress"><font color="#00648A">数据库压缩</font></a>
| <a href="admin_sql.asp"><font color="#00648A">SQL语句操作</font></a> | <a href="admin_data.asp?action=checkServerObject"><font color="#00648A">服务器探测</font></a></td>
</tr>
<tr class="td_bgcolor">
<td align="right" valign="middle">其它管理：</td>
<td valign="middle" style="line-height:18px;text-indent:18pt;">在这里您可以对其他栏目上传文件，数据库备份文件进行删除管理，以及网站皮肤样式进行编辑，添加等管理。后台操作事件日志，SQL注入日志的管理查看。<br>
导航菜单：<a href="admin_file.asp"><font color="#00648A">其它上传文件管理</font></a>
| <a href="admin_datafile.asp"><font color="#00648A">数据库文件管理</font></a>
| <a href="admin_skin.asp"><font color="#00648A">网站皮肤样式管理</font></a> | <a href="admin_log.asp"><font color="#00648A">操作日志管理</font></a>
| <a href="admin_sqlin.asp"><font color="#00648A">SQL注入管理</font></a></td>
</tr>
<tr class="td_bgcolor">
<td height="27" align="right" valign="middle">其它说明：</td>
<td valign="middle" style="line-height:18px;text-indent:18pt;"> 因本系统使用了少量缓存，如果您对菜单或者各栏目进行过更新，请千万别忘了单击<a href="admin_update.asp"><font color="#FF0000">更新缓存数据</font></a>。<br>如果还有其他不明白的，请到<a href="http://www.maosin.com">官方网站</a>寻找帮助。如果您在使用中发现有什么Dug,请到<a href="http://www.maosin.com">官方网站</a>通知我们，以便我们能为您及时解决。 为了您使用的系统更新及时方便，请不要删除除顶部的官方公告，官方公告可收到<a href="http://www.maosin.com" target="_blank">官方网站</a>发出最新程序，补丁，通知。谢谢！<br>
<div align="right">最后再次感谢您使用本系统，祝您的网站越办越好。</div>
</td>
</tr>
</table>
<%
table(5)
%>
<table width="100%" border="0" cellpadding="4" cellspacing="1" class="text table_border mainTable">
<tr align="center" valign="middle">
<td height="25" colspan="2" class="td_titleT">网站管理系统版权</td>
</tr>
<tr class="td_bgcolor">
<td width="200" height="22" valign="middle" align="right">版权标识：</td>
<td width="*" valign="middle"> <a href="http://www.maosin.com"><a href="http://www.maosin.com" target="_blank">Powerd By：MaoSin CMS</a></td>
</tr>
<tr class="td_bgcolor">
<td height="22" valign="middle" align="right">版权声明：</td>
<td valign="middle">1、本软件为共享软件,未经书面授权，不得向任何第三方提供本软件系统;<br/>2、用户自由选择是否使用,在使用中出现任何问题和由此造成的一切损失作者将不承担任何责任;<br/>3、您可以对本系统进行修改和美化，但必须保留完整的版权信息; <br/>4、本软件受中华人民共和国《著作权法》《计算机软件保护条例》等相关法律、法规保护，作者保留一切权利。 </td>
</tr>
</table>
<%
table(5)
%>
<table width="100%" border="0" cellpadding="4" cellspacing="1" class="text table_border mainTable">
<tr align="center" valign="middle"> <td height="25" colspan="2" class="td_titleT">茂盛网站管理系统</td>
</tr> <tr class="td_bgcolor">
<td width="200" height="22" valign="middle" align="right">程序开发：</td> <td width="*" valign="middle"> <a href="http://www.maosin.com">茂盛设计工作室</a></td> </tr> <tr class="td_bgcolor">
<td height="22" valign="middle" align="right">产品负责：</td> <td valign="middle">程序/美工/数据库（阿茂）</td>
</tr> <tr class="td_bgcolor">
<td height="27" valign="middle" align="right">当前版本号：</td> <td valign="middle">MaoSin CMS ver1.1</td> </tr> <tr class="td_bgcolor">
<td valign="middle" align="right">联系方式：</td> <td valign="top">官方网站：<a href="http://www.maosin.com" target="_blank">http://www.maosin.com</a> <a href="http://www.maosin.net" target="_blank">http://www.maosin.net</a><br> 电子邮件：maosin@163.com maosin@maosin.com<br> QQ交流：57861417 </td>
</tr>
</table>
<%
Call admin_foot()
End Sub
Sub serverInfo()
Dim okOS,okCUPS
On Error Resume Next
Dim WshShell,WshSysEnv
Set WshShell = Server.CreateObject("WScript.Shell")
Set WshSysEnv = WshShell.Environment("SYSTEM")
okOS = Cstr(WshSysEnv("OS"))
okCPUS = Cstr(WshSysEnv("NUMBER_OF_PROCESSORS"))
okCPU = Cstr(WshSysEnv("PROCESSOR_IDENTIFIER"))
If IsNull(okCPUS) Then
okCPUS = Request.ServerVariables("NUMBER_OF_PROCESSORS")
ElseIf okCPUS="" Then
okCPUS = Request.ServerVariables("NUMBER_OF_PROCESSORS")
End If
If Request.ServerVariables("OS")="" Then okOS=okOS & "(可能是 Windows Server 2003)"
set tongji=conn.execute("select total,today from ms_tongji")
if not tongji.eof and not tongji.bof then
total=tongji(0)
today=tongji(1)
else
total=0
today=0
end if
tongji.close
set tongji=nothing
%>
<table width="100%" border="0" cellpadding="2" cellspacing="1" class="text table_border mainTable">
<tr>
<td height="26" colspan="2" align="center" valign="middle" class="td_titleT">服务器信息</td>
</tr>
<tr valign="middle" class="td_topT">
<td height="24" colspan="2"> 统计信息 网站总访问人数：<font color="ff0000"><%=total%></font> 人，今日访问：<font color="ff0000"><%=today%></font> 人，当前在线：<font color="ff0000"><%=conn.execute("select count(id) from ms_online")(0)%></font> 人。 <a href="admin_tongji.asp">查看详细……</a> </td> </tr> <tr valign="middle" class="td_bgcolor"> <td height="30" colspan="2">欢迎使用 <a href="http://www.maosin.com"><font color="#00648A">茂盛网站管理系统（MaoSin CMS）</font></a>，本程序由 <a href="http://www.maosin.com"><font color="#00648A">茂盛设计网</font></a> 授权给 <font color="#ff0000"><b><%=webname%></b></font> 使用，当前版本 MaoSin CMS ver1.1。</td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td width="50%" height="30"> 服务器名：<%=Request.ServerVariables("SERVER_NAME")&" （IP地址："&Request.ServerVariables("LOCAL_ADDR")&"）"%></td>
<td width="50%"> ASP脚本解释引擎：<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %></td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td width="50%" height="30"> IIS 版本：<%=Request.ServerVariables("SERVER_SOFTWARE")%></td>
<td width="50%"> 网站程序版本：MaoSion Version 1.1</td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td width="50%" height="30"> 服务器操作系统：<%=okOs%></td>
<td width="50%"> 服务器CPU数量：<font color="#ff0000"><%=okCPUS%></font>个</td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td width="50%" height="30"> 服务器application数量：<font color="#ff0000"><%=application.Contents.count%></font>个</td>
<td width="50%"> 服务器session数量：<font color="#ff0000"><%=session.Contents.count%></font>个</td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td width="50%" height="30"> 服务器当前时间：<%=now%></td>
<td width="50%"> 脚本连接超时时间：<%=server.scripttimeout%></td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td width="50%" height="30"> 当前脚本路径：<%=Server.MapPath(Request.ServerVariables("SCRIPT_NAME"))%></td>
<td width="50%"> 服务器HTTP端口号：<%=Request.ServerVariables("SERVER_PORT")%></td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td width="50%" height="30"> FSO文本读写： <%if chkObjInstalled("Scripting.FileSystemObject")=true then :response.Write("√") :else:response.Write("<font color=""#ff0000"">×</font>") :end if%></td>
<td width="50%"> 无组件上传： <%if chkObjInstalled("ADODB.Stream")=true then :response.Write("√") :else:response.Write("<font color=""#ff0000"">×</font>") :end if%></td>
</tr>
<tr valign="middle" class="td_bgcolor">
<td height="24" colspan="2" align="right"><a href="admin_data.asp?action=checkServerObject">查看更详细服务器信息……</a> </td>
</tr>
</table>
<%
End Sub
'========================================================
'MaoSin CMS 1.1 Power by maosin.com
'Email: maosin@163.com , maosin@maosin.com
'Web: http://www.maosin .com http://www.maosin.net
'Copyright (C) 2006 maosin.com All Rights Reserved.
'========================================================
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -