<% Set oGroup = GetObject("WinNT://" & strDomain & "/" & strGroup) For each oUser in oGroup.Members Response.Write oUser.Name & "<br>" Next %>