RE: Deploying user list to workgroup
- From: Goatbiker <Goatbiker@xxxxxxxxxxxxxxxxxxxxxxxxx>
- Date: Tue, 5 Apr 2005 23:25:07 -0700
Nick,
That could be it. When I took the XPs off the list it deployed to the 2Ks.
I am on my way for now. Tomorrow, I'll try your fix to see what it tells
us. Thanks again.
Tom
"Nick Staff" wrote:
> Tom-
>
> I retested the script and it worked fine for me, unfortunately I guess that
> doesn't really matter since the goal is to get it working for you ;)
>
> Do you have any XP boxes where you're at? I'm guessing the reason it's
> working for me and not for you is I ran it on an XP box and possibly some of
> the code is not supported when run from 2000. If you want to verify this,
> open the script in notepad and put an appostrophe before the line on error
> resume next (should be like the first or second line in the script. Save it
> and then try running it - I bet you get an error (the on error resume next
> line basically supresses errors and the appostrophe comments out the line so
> you can see what's really going on).
>
> If my guess is right, then I think the script will still be able to update
> the 2000 boxes but it might just need to be run via windows xp. Would that
> be feasable or is there no way you can get a box set up with XP (if not I'll
> try to modify the script but I don't have a 2k box to test it on so it'll be
> a bit tricky).
>
> Please let me know, thanks.
>
> Nick
>
> "Goatbiker" wrote:
>
> > Nick,
> >
> > No Joy. Did as instructed, script runs and says "accounts have been
> > created", but no accounts on computers. It will not deploy and it will not
> > install the user to the computer it is on. Any thoughts?
> >
> > Tom
> >
> > "Nick" wrote:
> >
> > > okay, i wrote you a script that will do this for you.
> > >
> > > requirements:
> > > - admin account on all workstations has same username/password (if not
> > > you'll have to run it locally from each machine)
> > > -must be able to resolve names of workstations
> > > -adds users to Power Users group, change to desired group if Power Users is
> > > wrong (search the code for Power Users and replace with group name you want)
> > > - on 1 workstation create the file members.txt located at c:\members.txt
> > > (this contains the names of all workstations you want the users added to - 1
> > > name per line)
> > > - on the same workstation create the text file users.txt located at
> > > c:\users.txt (contains user accounts & their passwords - the format must be
> > > user,password 1 per line and no space after the comma unless you want
> > > the password to start with a space.
> > > - on the same workstation create the text file enjoy.txt open it and past
> > > the following code inside then save as "enjoy.vbs" with the quotes
> > > - Double click enjoy.vbs and come back later - a message will alert you when
> > > its done.
> > >
> > > 'START COPY
> > >
> > > On error resume next
> > >
> > > Set WSHShell = WScript.CreateObject("WScript.Shell")
> > > Set objFSO = CreateObject("Scripting.FileSystemObject")
> > >
> > > members = "c:\members.txt"
> > > users = "c:\users.txt"
> > >
> > > Const ForReading = 1
> > >
> > > strInputFile = members
> > >
> > > Set objTextStream = objFSO.OpenTextFile(strInputFile, ForReading)
> > > arrComputers = Split(objTextStream.ReadAll, vbCrLf)
> > > objTextStream.Close
> > >
> > > Set objTextFile = objFSO.OpenTextFile _
> > > (users, ForReading)
> > >
> > > For Each strComputer In arrComputers
> > >
> > > Do Until objTextFile.AtEndOfStream
> > > acctInfo = objTextFile.Readline
> > >
> > > uP = Split(acctInfo, ",", -1, 1)
> > >
> > > Set colAccounts = GetObject("WinNT://" & strComputer & "")
> > > Set objUser = colAccounts.Create("user", uP(0))
> > > objUser.SetPassword uP(1)
> > > objUser.SetInfo
> > >
> > > Set objGroup = GetObject("WinNT://" & strComputer & "/Power Users,group")
> > > Set objUseraDD = GetObject("WinNT://" & strComputer & "/" & uP(0) & ",user")
> > > objGroup.Add(objUseraDD.ADsPath)
> > >
> > >
> > > Loop
> > >
> > > Next
> > >
> > > wscript.echo "Accounts have been created"
> > >
> > > wscript.quit
> > > 'END COPY
> > >
> > > Hope this helps.
> > >
> > > Nick
> > >
> > >
> > > "Goatbiker" wrote:
> > >
> > > > This should be easy but I am stumped.
> > > >
> > > > How do I deploy, or copy, 150 user names to a 23 computer workgroup so I
> > > > don't have to make 3,450 entries? 20 computers are 2K/SP4 and three are
> > > > XP/SP2. All are on the same workgroup.
> > > >
> > > > Thanks,
> > > >
> > > > Tom
.
- References:
- Deploying user list to workgroup
- From: Goatbiker
- RE: Deploying user list to workgroup
- From: Nick
- RE: Deploying user list to workgroup
- From: Goatbiker
- RE: Deploying user list to workgroup
- From: Nick Staff
- Deploying user list to workgroup
- Prev by Date: RE: Strange privilege loss
- Next by Date: Solution found
- Previous by thread: RE: Deploying user list to workgroup
- Next by thread: RE: Deploying user list to workgroup
- Index(es):
Relevant Pages
|