iscsitarget
Contributor
Contributor

Thanks all for responding, 2bad that vmware is not doing thinapping per user/AD group.

as our AD is hosted remotly ad queries can take long, therefor i bypassed the group lookup function and just check if a file can be accessed:


Option Explicit

'Set Dimension
DIM fso
DIM WSHShell

'Set Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set WSHShell = WScript.CreateObject("WScript.Shell")

If (fso.FileExists("\\servername\Thinapps\Microsoft Office Visio 2007 Service Pack 2 (SP2)\Microsoft Office Visio 2007.exe")) Then
  WSHShell.Exec("""\\servername\Thinapps\ThinReg\thinreg.exe"" /Q ""\\servername\Thinapps\Microsoft Office Visio 2007 Service Pack 2 (SP2)\Microsoft Office Visio 2007.exe""")
End If


'Exit Script
WScript.Quit()


I run this script at users logon.

Reply
0 Kudos