求大家帮忙翻译一段代码

来源：百度知道 编辑：UC知道 时间：2024/06/28 09:18:10
MM_authorizedUsers="1,2,0"
MM_authFailedURL="index.asp"
MM_grantACCess=false
if Session(MM_Username")<>""then
if(false Or CStr(Session("MM_UserAuthorization"))="")Or_
(InStr(1,MM_authorizedUsers,Sessio(MM_UserAuthorization"))>=1
Then
MM_grantAccess= true
End If
End If
if Not MM_grantAccess Then
MM_qsChar="?"
if(inStr(1,MM_authFailedURL,"?")>=1)Then MM_qsChar="&"
MM_referrer=Request.ServerVariables("URL")
if (Len(Request.QueryString())>0) Then
MM_referrer=MM_referrer & "?" &Request.QueryString()
MM_authFailedURL=MM_authFailedURL&MM_qsChar&"accessdenide="& Server.URLEncode(MM_referrer)
Response.Redirect(MM_authFailedURL)
End if

这段代码我就是硬是看不懂，请哪个高人帮我翻译一下每行代码大概是什么意思，谢谢啊，解决了追加分啊~

MM_authorizedUsers="1,2,0" '给变量MM_authorizedUsers赋值
MM_authFailedURL="index.asp" '给变量MM_authFailedURL赋值
MM_grantACCess=false '给布尔型变量MM_grantACCess赋值
if Session("MM_Username")<>""then '如果Session变量MM_Username不为空(这里Session是一种服务器变量,用于储存参数,如不懂可以去搜一下)
if (false Or CStr(Session("MM_UserAuthorization"))="") Or (InStr(1,MM_authorizedUsers,Session("MM_UserAuthorization"))>=1 Then
'如果(Session变量MM_UserAuthorization转化为字符型(Cstr)后为空)或者在变量MM_authorizedUsers中存在Session变量MM_UserAuthorization里储

存的值(IsStr为比较两个字符串的函数)则
MM_grantAccess= true '变量MM_grantAccess为真
End If
End If
if Not MM_grantAccess Then '如果变量MM_grantAccess为假(因为开始MM_grantAccess赋值为假,如果上面的If语句的条件为真则MM_grantAccess

会被赋值为真,否则依然为假)
MM_qsChar="?" '给变量MM_qsChar赋值
if(inStr(1,MM_authFailedURL,"?")>=1)Then MM_qsChar="&&qu