Sync ADUC and Local Computer Description fields

This is a script to take the description field in Active Directory Users and Computers and place it in the local computer description field. I'm surprised this field doesn't sync automatically. Anyway you could add this to a login or startup script. Or schedule to run every month or so, depend on what your use is. I just wanted the fields to match if the server was retasked (is that a real word?).
 

Set objSysInfo = CreateObject("ADSystemInfo")
Set objComputer = GetObject("LDAP://" & objSysInfo.ComputerName)

'msgbox objComputer.Description 'for testing to view pop up of description field

Set Obj= GetObject("winmgmts:\\" & strComputer).InstancesOf("Win32_OperatingSystem")
For Each x In Obj
   x.Description = objComputer.Description
   x.Put_
Next

Citrix Web Interface based on Client IP

I looked all over the Internet and no one could provide details on how to accomplish this without the Citrix Access Gateway.
Then after our company purchased the access gateway (very similar to a Cisco web VPN except using SSL) I found the web interface SDK.

link to web interface sdk site
http://community.citrix.com/display/xa/Web+Interface+SDK

it turns out the the SDK has a step by step tutorial on how to do exactly this, filter applications that appear on the web interface based on the clients IP. It also seems the new web interface is written in .NET and very easy to create your own custom web interface or just add the login and applications to your own site. Anyway it's worth a look to do some fancy stuff. I wish we found this earlier.
I hope this helps someone else.

Also wanted to mention that it not only needs the access gateway to do this filtering, but it requires another piece of Citrix software, Advanced Access Control.The Advanced Access Control installs similar to Presentation Servers with the whole farm setup.

This is a link to the Advanced Access Control 4.0 software and architecture.
http://support.citrix.com/article/CTX107386