当前位置: 首页 > 图文教程 > 网络编程 > ASP > 数组显示菜单效果

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字,大写字母,小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP,对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

ASP 中的 数组显示菜单效果


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 115 ::
收藏到网摘: n/a

复制代码 代码如下:
<%
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
%>