<HTML>
<BODY>

<%
' Revoke a permission previously given to a user
Set AU = Server.CreateObject("Persits.AspUser")
AU.LogonUser "MYDOMAIN", "Administrator", "xxxxxx"
Set File = AU.File("d:\somefile.txt")

File.RevokeAllowance "Guest"
%>

</BODY>
</HTML>