杭州交通信息网像荷花一样的人有谁:我想知道一下，这代码怎么解释
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/25 15:01:18
<%
Dim zsb_auth, hasAuth
hasAuth = False
zsb_auth = Split( Trim( session("zsb_auth") ), ",", -1, 1 )
For Each auth In zsb_auth
If ( auth = "config" ) Then
hasAuth = True
Exit For
End If
Next
If hasAuth = false Then
Response.Write("<script language=javascript>alert('对不起，你没有权限，请联系超级管理员！');history.back(-1);</script>")
Else
%>
Dim zsb_auth, hasAuth
hasAuth = False
zsb_auth = Split( Trim( session("zsb_auth") ), ",", -1, 1 )
For Each auth In zsb_auth
If ( auth = "config" ) Then
hasAuth = True
Exit For
End If
Next
If hasAuth = false Then
Response.Write("<script language=javascript>alert('对不起，你没有权限，请联系超级管理员！');history.back(-1);</script>")
Else
%>
这个大约是一个输入密码并判断的程序。
密码正确：(config)结束
密码错误：显示“对不起，你没有权限，请联系超级管理员！'”