A Simple vb script to create a OU ( Organizational unit ) in the Active directory. Please find the below script, edit the script as your needs. I will explain in both picture and video. Please tell your comments.
Set objDomain = GetObject("LDAP://DC=test, DC=com")
Set objOU = objDomain.Create("organizationalUnit", "OU=North_Bay")