Win NT password programm manipulation

[lullcat]

Hi all, i have next problem:
1. I have nearly 200 NT 4 (sp 5/6a) WS in workgroup (not in domain)
2. I want to change administrator password on all workstation
3. VBS f.e.
Dim usr As IADsUser
Set usr = GetObject("WinNT://Microsoft/administrator,user&quot
usr.ChangePassword "oldpassword", "newpassword"
to generate the message:
Line: 1
Char: 9
Error: Expected end of statement
Code: 800A0401
Source : Microsoft VBScript compilation error

Anybody know how resolve this problem or offer other way for programm change NT password LullCat \O/

 

[strongm]

VBScript only has one variable type, so you can't Dim a variable AS anything. Change the first line of your code to:

Dim usr

 

[lullcat]

But this sample i get from book -)))??? LullCat \O/

 

[bburnell]

Everything in VBScript is defined as a variant. It does not allow string or integer types.
Brett Please visit my websites!

http://www.smsforce.com

http://www.goodguyz.com

 

[strongm]

Lullcat,

The example from the book was probably written for VB not VBScript.

Although they are superficially similar, you should be aware that VBScript is not VB; it is a cut-down, bastardised subset.