Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.
'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"
|VBA change replacement list from code to excel sheet list||2||41|
|Search for letter on "H" column, have it highlighted in a color and if that color is clicked have the color display in yellow.||28||43|
|Powershell script to pull Info from all server within a domain||4||35|
|execution of the windows script host failed. (access is denied.)||3||13|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
10 Experts available now in Live!