Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
'Script begins here Dim objGroup, objUser, objFSO, objFile, strDomain, strGroup, Domain, Group 'Change DomainName to the name of the domain the group is in strDomain = Inputbox ("Enter the Domain name", "Data needed", "Default domain name") 'Change GroupName to the name of the group whose members you want to export strGroup = InputBox ("Enter the Group name", "Data needed", "Default group name") Set objFSO = CreateObject("Scripting.FileSystemObject") 'On the next line change the name and path of the file that export data will be written to. Set objFile = objFSO.CreateTextFile("C:\" & strGroup & " - Members.txt") Set objGroup = GetObject("WinNT://" & strDomain & "/" & strGroup & ",group") For Each objUser In objGroup.Members objFile.WriteLine objUser.FullName Next objFile.Close Set objFile = Nothing Set objFSO = Nothing Set objUser = Nothing Set objGroup = Nothing Wscript.Echo "Done" Wscript.Echo "Please check the c: for your output file"
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.