权限控制操作菜单显示的代码__教程 - 久丰模板网站，提供免费及精美的网页模板下载

文章搜索：分类关键字

收藏本站

设为首页

您的位置：首页 → 网页设计 → ASP程序 → 权限控制操作菜单显示的代码__教程

权限控制操作菜单显示的代码__教程

日期：2007-5-20 0:37:00 人气：45 [大中小]

[1]

　以下是代码片段：

Response.Write("function getPrivate(){" & vbCrLf)
        For i As Integer = 1 To Session("Private").ToString.Length
            Response.Write(MENUshow(Mid(Session("Private").ToString， i， 1)， i))
        Next
        Response.Write("}")
        Response.End()
    End Sub
    Private Function MENUshow(ByVal i As Integer， ByVal t As Integer) As String
        Select Case i
            Case 0
                MENUshow = "document.all[＇menu" & t & "＇].style.display=＇＇;" & vbCrLf
            Case 1
                MENUshow = "document.all[＇menu" & t & "＇].style.display=＇none＇;" & vbCrLf
        End Select
    End Function

说明：Session("Private")是从数据库里取出的权限字段的值，其格式为"0100"，其对应的权限为依次控制页面中id为menu1，menu2，menu3，menu4的菜单的DIV或者TD是否显示，0为显示，1为不显示
使用：在页面中用JS包含

出处：本站原创作者：佚名

推荐文章