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
>
>
>
>


Reply via email to