Yes, but he did say it was machine specific... :D

On Mon, May 20, 2013 at 9:24 AM, James Rankin <[email protected]> wrote:

> 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