<HTML>
<BODY>

<%
' Deny a user any access to a file
Set AU = Server.CreateObject("Persits.AspUser")
AU.LogonUser "MYDOMAIN", "Administrator", "xxxxxx"
Set File = AU.File("d:\somefile.txt")

File.DenyAccess "Guest", GENERIC_ALL
%>

</BODY>
</HTML>