Aussie owned and operated, with 23+ years of industry experience, Gold Coast InfoTech is delighted to support all of your business technology requirements.

Gallery

Contacts

success@goldcoastinfotech.com.au

1800 291 071

KBArticles

Load Specific Theme not working with Run Only Specified Windows Applications

Problem When configuring a very restricted desktop for 3rd party access we configured the ‘Run Only specified Windows Applications’ Surprisingly very little actually stopped working. However the Windows Aero.theme was no longer being applied: Solution Add the following executables to allow the theme to apply: shell32.dll, dwm.exe, rundll32.exe svchost.exe, regsvr32.exe in the group policy location User […]

KBArticles

XenApp 6.5 PVS Generalise Script 2014

Script run before PVS server shutdown maintenance REM Prompt for vDisk version Number “C:adminToolsGeneralise_PVS_REGPrompt.vbs” Set wshShell = CreateObject(“WScript.Shell”) strAnswer = InputBox(“Enter New PVS Version Number”, _ “Version No”) RegUpdate=”HKLMSOFTWAREPVSvDiskVersion” WshShell.RegWrite RegUpdate,strAnswer,”REG_SZ” Wscript.Echo “Dont Forget to delete all user Local Profiles!” wshshell.run “RunDll32.exe sysdm.cpl,EditUserProfiles” REM clear event logs wevtutil cl System wevtutil cl Security wevtutil cl […]

Scripts, Commands, Registry WALK THROUGH

Dynamically display the PVS environment detail on users desktop with BGINFO

I want all PVS servers to dynamically display their environment on the desktop when a users logs into the desktop. This can be achieved by: 1) adding a new ‘personality’ variable to each device in PVS 2) scripting the import of the variables from the c:personality.ini file to the windows registry 3) setting BGINFO to […]

Scripts, Commands, Registry

VBSCRIPT to merge multiple text files

Const ForReading = 1 Set objFSO = CreateObject(“Scripting.FileSystemObject”) Set objOutputFile = objFSO.CreateTextFile(“output.txt”) strComputer = “.” Set objWMIService = GetObject(“winmgmts:\” & strComputer & “rootcimv2”) Set FileList = objWMIService.ExecQuery _ (“ASSOCIATORS OF {Win32_Directory.Name=’c:temp’} Where ” _ & “ResultClass = CIM_DataFile”) For Each objFile In FileList Set objTextFile = objFSO.OpenTextFile(objFile.Name, ForReading) strText = objTextFile.ReadAll objTextFile.Close objOutputFile.WriteLine strText Next […]