<HTML>
<BODY>

<%
' Display Current Server, Domain and User Names
Set AU = Server.CreateObject("Persits.AspUser")
%>

Server: <% = AU.GetComputerName %> 
Domain: <% = AU.GetDomainName %> 
User: <% = AU.GetUserName %> 

</BODY>
</HTML>