Monday, October 15, 2007

Vista en User Profiles




KB art. nr. 930955

try this:
script1



script2

strComputer ="." Set objAccount = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _ & strComputer &"\root\cimv2:Win32_UserAccount." _ &"Domain='personeel',Name='p0082001'") Set objUserProfile = GetObject("winmgmts:{impersonationlevel=impersonate}!\\" _ & strComputer &"\root\cimv2:Win32_UserProfile." _ &"SID='" & objAccount.SID &"'") objUserProfile.Delete_




result:



Situation:

No comments: