<HTML>
<BODY>

<%
' Does the Domain Admins group include this user?

Set AU = Server.CreateObject("Persits.AspUser")

Set Group = AU.GetGroup("Domain Admins")
If Group.Users("peter") Is Nothing Then
   Response.Write "Domain Admins does not include this user"
Else
   Response.Write "Domain Admins includes this user"
End If

%>

</BODY>
</HTML>