HasAccess 메서드는 사용자에게 지정된 파일에 대한 액세스 권한이 있는지 테스트합니다.
OVar.HasAccess( FilePath )
웹 사용자에게 지정된 파일에 대한 액세스 권한이 있는지를 나타내는 부울 값을 반환합니다. 파일이 없거나 디렉터리가 지정되어 있는 경우 PermissionChecker 개체는 False를 반환합니다.
다음은 PermissionChecker 개체를 사용하여 웹 사용자에게 C:\pages\private\default.htm 파일에 대한 액세스 권한이 있는지 확인하는 예제입니다. 사용자에게 액세스 권한이 있으면 스크립트는 해당 파일로 연결되는 하이퍼링크를 작성합니다. 액세스 권한이 없으면 메시지를 기록합니다. 이 예제에서는 가상 경로를 사용합니다.
--- PermChecker.asp ---
<%
If "" = Request.ServerVariables("LOGON_USER") Then
Response.Write "<H3>Please disable Anonymous Access for this Virtual Directory</H3>"
Else
Set oPermChecker = Server.CreateObject("MSWC.PermissionChecker")
%>
<H3>Checking Permissions</H3>
<P>Logged On User =
<%=Request.ServerVariables("LOGON_USER")%>
<P>
Access to Physical Path
<%=Request.ServerVariables("PATH_TRANSLATED")%>
=
<%=oPermChecker.HasAccess(Request.ServerVariables("PATH_TRANSLATED"))%>
<P>
Access to Virtual Path
<%=Request.ServerVariables("PATH_INFO")%>
=
<%=oPermChecker.HasAccess(Request.ServerVariables("PATH_INFO"))%>
<P>
If you have access to
http://<%=Request.ServerVariables("SERVER_NAME")%>/iissamples/sdk/asp/simple/Variables_VBScript.asp
then you will see a link below:<BR>
<%
If oPermChecker.HasAccess("/iissamples/sdk/asp/simple/Variables_VBScript.asp") Then
%>
<A href="http://localhost/iissamples/sdk/asp/simple/Variables_VBScript.asp">
http://localhost/iissamples/sdk/asp/simple/Variables_VBScript.asp
</A>
<%
End If
End if
%>