<%
' Validate a username/password against SAM
Set AU = Server.CreateObject("Persits.AspUser")
On Error Resume Next
AU.LogonUser "mydomain", "Administrator", "xxxx"
If Err <> 0 Then Response.Redirect "AccessDenied.html"
' Cancel "On Error Resume Next"
On Error Goto 0
%>
<HTML>
<BODY>
Account is validated.
</BODY>
</HTML>