Winner! -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Kurt Buff Sent: Monday, May 20, 2013 7:26 AM To: [email protected] Subject: Re: [NTSysADM] .VBS error
Fire the user, format the workstation. Done. On Mon, May 20, 2013 at 6:13 AM, David Lum <[email protected]> wrote: > I run this script on all my workstation systems, and it works > flawlessly for over 500 systems, but I have ONE user where it bombs > out with an error and AD is not updated. > > > > Dim ad, objUser, objComputer > > > > Set ad = CreateObject("ADSystemInfo") > > On error resume Next > > Set objUser = GetObject("LDAP://" & ad.UserName) > > On error resume Next > > Set objComputer = GetObject("LDAP://" & ad.ComputerName) > > On error resume Next > > strMessage = objUser.CN & ", Last updated:" & Month(Now()) & "/" & > Day(now()) & "/" & right(year(now()),4) > > > > objComputer.Description = strMessage > > objComputer.SetInfo > > > > I don’t even know what to troubleshoot. This VPN script is applied via > GPO startup script, and runs only on workstation OS systems as the WMI > filter > is: select * from Win32_OperatingSystem where not (name like "%server%"). > > > > · We have other system like this (perhaps slightly different > software load, it’s a developers’ m machine) that the script runs on > successfully > > · Scripts runs fine for this user if he logs onto a different > machine > > > > It comes down to likely some piece of installed software is tripping > it up, but there is nothing in the event logs. > > > > Anyone? > > > > Dave > > > >
