数组显示菜单效果
2018-09-06 13:04
复制代码 代码如下:<%
Dim menu(6, 10)
Rem 管理栏目设置
menu(0, 0) = 常规设置
menu(0, 1) = 基本设置 广告管理
menu(0, 2) = 模板样式总管理
menu(0, 3) = 模板导出 模板导入
menu(0, 4) = 发布公告> 公告管理
menu(1, 0) = 软件管理
menu(1, 1) = 添加软件 管理软件
menu(1, 2) = 添加软件分类 管理
menu(1, 3) = 下载服务器管理
menu(1, 4) = 回收站管理
menu(1, 5) = 前台发布软件管理
menu(1, 6) = 错误软件 更新数据
menu(1, 7) = 软件评论管理
menu(1, 8) = 生成下载排行JS
menu(1, 9) = 添加天空软件信息
menu(2, 0) = 文章管理
menu(2, 1) = 添加文章 管理文章
menu(2, 2) = 添加文章分类 管理
menu(2, 3) = 数据更新 回收站
menu(2, 4) = 文章评论管理
menu(2, 5) = 生成文章排行JS
menu(3, 0) = 生成 HTML
menu(3, 1) = 生成首页 软件列表
menu(3, 2) = 热门软件 软件信息
menu(3, 3) = 更新软件 推荐软件
menu(3, 4) = 文章首页 文章列表
menu(3, 5) = 热门文章 文章内容
menu(3, 6) = 生成分类 更新文章
menu(4, 0) = 用户管理
menu(4, 1) = 查看会员信息
menu(4, 2) = 管理员密码修改
menu(4, 3) = 管理员添加 管理
menu(4, 4) = 用户组添加 管理
menu(4, 5) = 邮件列表 列表导出
menu(4, 6) = 发邮件
menu(5, 0) = 其它设置
menu(5, 1) = 友情链接添加 管 理
menu(5, 2) = 网站栏目添加 管 理
menu(5, 3) = IP锁定添加 管理
menu(5, 4) = 增加投票 投票管理
menu(5, 5) = 上传图片管理
menu(5, 6) = 上传文件管理
menu(5, 7) = 在线文件管理
menu(6, 0) = 数据处理(Access)
menu(6, 1) = 数据库更名 备 份
menu(6, 2) = 数据库压缩 恢 复
menu(6, 3) = 服务器信息
menu(6, 4) = 数据库批量替换
menu(6, 5) = 系统空间占用
for i=0 to ubound(menu,1)
response.write <b>&menu(i,0)&</b><br />
for j=1 to ubound(menu,2)
response.write menu(i,j)&<br />
next
next
%>