Add a Domain Group to a Local Group

Search

hits.

Login

purpleender

Rep

44052

Newmarket

Bumder

Andrew

Gonna get High till the day I die! Reality is an illusion that occurs due to lack of resin.

FIFA Street 5/13/2012 660 1000 25 34 73%
F1 2010™ 5/13/2012 390 1000 22 50 44%
Angry Birds 5/12/2012 30 200 4 20 20%
RISK Factions 9/15/2011 125 200 7 12 58%
Skate 3 5/8/2012 110 1500 6 68 8%

Add a Domain Group to a Local Group

Last Updated on Wednesday, 01 April 2009 21:15 Written by Administrator Thursday, 26 March 2009 21:59

To add a Network Group to a Local Group:

MyLocalGroup = "Administrators"
MyDomain = "Andrew-Henderson.me.uk"
MyDomainGroup = "LocalAdmins"

strComputer = "."
Set objGroup = GetObject("WinNT://./" & MyLocalGroup & ",group")
Set objUser = GetObject("WinNT://" & MyDomain & "/" & MyDomainGroup & ",group")
objGroup.Add(objUser.ADsPath)

Please Note: Append to Template.vbs to run this script.