Custom Search

---

Guy recommends :
Free - WMI Monitor

Get more ideas for your PowerShell scripts with SolarWinds' WMI Monitor.

Free WMI Monitor Download

---

---

Guy's Review of Computer Tools

 1) Belarc Advisor
 2) Engineers Toolset
 3) Freeping
 4) PuTTY
 5) Permission Analyzer
 6) Secunia
 7) Net-SNMP
 8) Mobile IT Admin App
 9) DNS Stuff
10) WinDiff Compare

---

Short computer jokes

How VBScript Adds Users to a Group

VBScript Add Users To Group Tutorial

This page will show you how take a user and then add them to a named group.  I will also give you an example of adding all users in a named OU to a particular group.

Topics for Adding Users to a Group with VBScript

• Our Mission and Goal
• Example 1: Adding one User to a Named Group
• VBScript Tutorial - Learning Points for Adding One User to a Group
• Example 2: - Adding Lots of Users to a Group
• VBScript Tutorial - Learning Points for Adding Lots of Users to a Group
• Solarwinds Permissions Analyzer
• Summary for Adding Members to Groups

 ♣

Our Mission and Goal

Anything and everything to do with groups is tricky to script.  Fortunately, adding members to a group is relatively straightforward.

When you examine any Group in Active Directory Users and Computers, observe two similar tabs, Members (who is in this group) and Member Of, which shows other groups to which this group belongs.  It really is worth mastering this semantic difference.

We have two missions, firstly to add one user to a group of your choice.  Secondly, to add all the users who match our criteria, to a named group.

Example 1: Adding one User to a Named Group

Prerequisites

Recommended: that you logon as administrator, preferably at a domain controller.  If you are a long way from the server, Remote Desktop would be a suitable alternative.  If that is not possible, you could get these scripts to work from an XP machine as a non-administrator.  However, why introduce extra complications?  Especially at the beginning, you want easy success, with fewest obstacles.

Instructions for Adding one User to a Group

1. You should run this VBScript on a Windows Active Directory domain.
2. Copy and paste the example script below into notepad or a VBScript editor.
3. Decide upon your tactics.  Either create users, groups and OUs to match the script, or change the script to match your existing users, groups and OUs.
4. Save the file with a .vbs extension, for example: GroupAdd .vbs.
5. Double click GroupAdd .vbs and check the strOU for your new group.

Guy Recommends:  SolarWinds' Free Bulk Import Tool

Import users from a spreadsheet.  Just provide a list of the users with their fields in the top row, and save as .csv file.  Then launch this FREE utility and match your fields with AD's attributes, click and import the users.

Optionally, you can provide the name of the OU where the new accounts will be born. Download your FREE bulk import tool.

If you need more comprehensive software, download a free trial of SAM (Server & Application Monitor)

Sample VBScript to Add one User to a Group

VBScript Tutorial - Learning Points

Special Note:

Peter C found a problem with strOU:.  Kindly, Peter discovered this solution to his problem.

Note 1:  The header section deals with the usual preamble of explaining the purpose of the script and declaring the variables.

Note 2:  This script does not create any objects.  Therefore, it is vital to check that the values for strOU, strUser and strGroup are what you expect.

Note 3:  Pay particular attention to commas with strOU.  Remember where to employ: CN= (common name).

Note 4:  During testing, the GetObject method gave me the most trouble.  I had to go back to basics and remind myself that what the script needs to do is get a handle on the full name of the object, for example:
"LDAP://CN=Len Murray,OU=Newport,DC=CP,DC=COM". 
Because of the many advantages of using variables, I built up the name like this :
"LDAP://" & strUser & strOU & strDNSDomain.
strUser converts to: CN=Len Murray,   Note the CN= also the comma at the end.
strOU converts to OU=Newport,  Note the use of OU=Newport but CN=Users (one is an OU, the other a container object).

Note 5: The key verb is .add.  If you make a script to undo your action you would substitute objGroup.remove for objGroup.add.

Note 6:  .ADsPath is a handy property of the objUser.  In this instance .ADsPath translates to CN=Len Murray,OU=Newport,DC=CP,DC=COM.  Clearly it is much more efficient to use .ADsPath (Active Directory Path).

Recommended: Solarwinds' Permissions Analyzer - Free Active Directory Tool

I like the Permissions Analyzer because it enables me to see WHO has permissions to do WHAT at a glance.  When you launch this tool it analyzes a users effective NTFS permissions for a specific file or folder, and takes into account network share access, then displays the results in a nifty desktop dashboard!

Think of all the frustration that this free SolarWinds utility saves when you are troubleshooting authorization problems for user's access to a resource.  Give this permissions monitor a try - it's free!

Download SolarWinds' Free Permissions Analyser - Active Directory Tool

Example 2: - VBScript Adding Lots of Users to a Group

The whole point of scripting is to make life easier.  We invest time in creating VBScripts which repay by saving time when it comes to boring repetitive tasks.  Example 1 shows you how to add a user to a group.  This second example builds on that method and adds a loop to add all the objects, which match a simple criteria, namely they are User objects and not computers or contacts.

Sample VBScript to Add Users to a Group

VBScript Add Users - Learning Points

Note 1:  The key additional feature of this script is the simple but effective loop.  It starts with 'For Each', rather than plain 'For' it also includes the crucial word 'In'.  The reason for these extra words in the For....Next loop is because in this example, we have a collation (collection) of user objects in objOU.

Note 2:  If you compare the Set... GetObject statements with the first example, you will notice an extra statement which connects to a specific OU, this is what I mean, Set objOU =GetObject("LDAP://" & strOU & strDNSDomain).

Note 3:  At the outset I said scripting groups was tricky.  What nearly drove me mad with this script was "User".  The solution was to change it to: "user" - a rare case of case sensitivity.  This is the reason I left lcase("User") in the final script.

See more VBScript group examples:

• VBScript create users  • VBScript create group    • VBScript create OU   • VBScript add users

• VBScript group membership   • VBScript memberOf group   • VBScript group const  • Free WMI Monitor

• VBScript create computer   • VBScript enumerate members   • PowerShell group members

 *

---

Custom Search Site Home	Guy Recommends: WMI Monitor for Powershell Windows Management Instrumentation (WMI) is most useful for PowerShell scripting. SolarWinds have produced this Free WMI Monitor to take the guess work out of which WMI counters to use for applications like Microsoft Active Directory, SQL or Exchange Server. Download your free copy of WMI Monitor
Author: Guy Thomas Copyright © 1999-2013 Computer Performance LTD All rights reserved. Please report a broken link, or an error to: