{"id":442,"date":"2009-11-29T01:56:33","date_gmt":"2009-11-28T17:56:33","guid":{"rendered":"http:\/\/www.jhouseconsulting.com\/?p=442"},"modified":"2010-10-04T02:36:57","modified_gmt":"2010-10-03T18:36:57","slug":"deployment-script-for-the-repair-clipboard-chain-utility","status":"publish","type":"post","link":"https:\/\/www.jhouseconsulting.com\/jhouseconsulting\/2009\/11\/29\/deployment-script-for-the-repair-clipboard-chain-utility-442","title":{"rendered":"Deployment Script for the Repair Clipboard Chain utility"},"content":{"rendered":"

Here is a deployment script for the Citrix Repair Clipboard Chain (RepairCBDChain.exe) utility as per Citrix KB article CTX106226<\/a>.<\/p>\n

This utility does not have a nice default icon, so I have used one that looks like this: \"\"<\/a><\/p>\n

I have zipped up the actual ico file here: clipboard<\/a><\/p>\n

Enjoy!<\/p>\n


\n‘ Installation script for the Repair Clipboard Chain utility as per Citrix KB article CTX106226
\n‘
\n‘ Notes:
\n‘ 1) Even though this a a 32-bit application…
\n‘ i) It will still run 100% correctly in a 64-bit environment.
\n‘ ii) In a 64-bit environment we deploy it to the “%ProgramFiles%”
\n‘ location and not the “%ProgramFiles(x86)%” location. This provides
\n‘ a single location for the published application regardless of the
\n‘ system architecture type.
\n‘
\n‘ Revision 1.0
\n‘ Written by Jeremy@jhouseconsulting.com on 10th November 2009.<\/p>\n

Option Explicit<\/p>\n

Dim objfso, objFolder, wshShell, oShellLink, strAUPrograms, strAUDesktop
\nDim strProgramFiles, strScriptPath, blnStartMenuShortcut, blnDesktopShortcut
\nDim strStartMenuSubFolder, strStartMenuFolder<\/p>\n

blnStartMenuShortcut = True
\nblnDesktopShortcut = False
\nstrStartMenuSubFolder = “User Self-Help Tools”<\/p>\n

set WshShell = WScript.CreateObject(“WScript.Shell”)
\nset objfso = CreateObject(“Scripting.FileSystemObject”)<\/p>\n

strProgramFiles = WshShell.ExpandEnvironmentStrings(“%ProgramFiles%”)
\nstrAUPrograms = WshShell.SpecialFolders(“AllUsersPrograms”)
\nstrAUDesktop = WshShell.SpecialFolders(“AllUsersDesktop”)
\nstrScriptPath = Left(WScript.ScriptFullName, InstrRev(WScript.ScriptFullName, “\\”))<\/p>\n

If objFSO.FileExists(strScriptPath & “RepairCBDChain.exe”) AND objFSO.FileExists(strScriptPath & “clipboard.ico”) Then
\n If NOT objFSO.FolderExists(strProgramFiles & “\\Citrix”) Then
\n Set objFolder = objFSO.CreateFolder(strProgramFiles & “\\Citrix”)
\n End If
\n objFSO.CopyFile strScriptPath & “RepairCBDChain.exe”, strProgramFiles & “\\Citrix\\”, True
\n objFSO.CopyFile strScriptPath & “clipboard.ico”, strProgramFiles & “\\Citrix\\”, True
\n If blnStartMenuShortcut Then
\n If strStartMenuSubFolder <> “” Then
\n strStartMenuFolder = strAUPrograms & “\\” & strStartMenuSubFolder
\n If NOT objFSO.FolderExists(strAUPrograms & “\\” & strStartMenuSubFolder) Then
\n Set objFolder = objFSO.CreateFolder(strAUPrograms & “\\” & strStartMenuSubFolder)
\n End If
\n Else
\n strStartMenuFolder = strAUPrograms
\n End If
\n Set oShellLink = WshShell.CreateShortcut(strStartMenuFolder & “\\Repair Clipboard Chain.lnk”)
\n oShellLink.TargetPath = chr(34) & strProgramFiles & “\\Citrix\\RepairCBDChain.exe” & chr(34)
\n oShellLink.WorkingDirectory= strProgramFiles & “\\Citrix”
\n oShellLink.IconLocation = strProgramFiles & “\\Citrix\\clipboard.ico” & “,0”
\n oShellLink.Save
\n End If
\n If blnDesktopShortcut Then
\n Set oShellLink = WshShell.CreateShortcut(strAUDesktop & “\\Repair Clipboard Chain.lnk”)
\n oShellLink.TargetPath = chr(34) & strProgramFiles & “\\Citrix\\RepairCBDChain.exe” & chr(34)
\n oShellLink.WorkingDirectory= strProgramFiles & “\\Citrix”
\n oShellLink.IconLocation = strProgramFiles & “\\Citrix\\clipboard.ico” & “,0”
\n oShellLink.Save
\n End If
\nEnd If<\/p>\n

Set WshShell = Nothing
\nSet objfso = Nothing
\nSet objFolder = Nothing
\nSet oShellLink = Nothing<\/p>\n

WScript.Quit(0)
\n<\/dirtycode><\/p>\n","protected":false},"excerpt":{"rendered":"

Here is a deployment script for the Citrix Repair Clipboard Chain (RepairCBDChain.exe) utility as per Citrix KB article CTX106226. This utility does not have a nice default icon, so I have used one that looks like this: I have zipped up the actual ico file here: clipboard Enjoy!<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"ngg_post_thumbnail":0,"footnotes":""},"categories":[5],"tags":[169,168],"class_list":["post-442","post","type-post","status-publish","format-standard","hentry","category-scripting","tag-ica","tag-repair-clipboard-chain"],"aioseo_notices":[],"aioseo_head":"\n\t\t\n\t\n\t\n\t\n\t\n\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t