Ændring af password for bruger i serverens lokale brugerdatabase

Hej

Jeg er ved at lave en side, hvor mine brugere kan ændre deres passwords. Brugerne er oprettet som lokale brugere på en Windows Server 2003 (udviklingsserver/standalone). Til det formål har jeg fundet ud af at følgende script kan bruges:
  Set objUser = GetObject("WinNT://'ServerNavn'/'BrugerNavn', User")
  objUser.ChangePassword 'GammeltPassord', 'NytPassword'

Dette virker fint, men nu vil jeg flytte det over på min drift server, som er en Windows 2000 Server der er meld ind i et AD men er ikke DC. Brugerne som jeg skulle kunne skifte password på er oprettet lokalt på denne server.

Når jeg afvikler scriptet, får jeg følgende fejl "error '80005000'" i linien med GetObject.
Jeg har også prøvet med:
  Set objUser = GetObject("WinNT://'ServerNavn'/Users/'BrugerNavn')
men det gør ingen forskel.

MVH
Bjarne