The user probably has some crazy character in their account name like an
"&" or something

(Just a total guess based on the fact you didn't provide the error) :-)
On 20 May 2013 14:13, 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****
>
> ** **
>
> ** **
>



-- 
*James Rankin*
Technical Consultant (ACA, CCA, MCTS)
http://appsensebigot.blogspot.co.uk

Reply via email to