Jumat, 15 November 2013

Pinned Shortcut to Start Menu & Taskbar in Windows 7 || Windows Server 2003 || Group Policy Object

2 komentar
Sudah beberapa hari saya berkutak-katik di Server 2003 R2 SP2 untuk menemukan bagaimana caranya pin shortcut kedalam Start Menu pada Windows 7 dengan menggunakan Group Policy. Sudah berbagai cara saya lakukan. Nanya mbah google, otak-atik GPO dan sebagainya saya lakukan. Akhirnya saya menemukan sebuah script yang dapat digunakan untuk pin shortcut itu.

Script yang digunakan adalah file .vbs
Buka Text Editor (Notepad) dan simpan script dibawah ini dengan nama PinItem.vbs



Const CSIDL_COMMON_PROGRAMS = &H17
Const CSIDL_PROGRAMS = &H2

Set objShell = CreateObject("Shell.Application")
Set objAllUsersProgramsFolder = objShell.NameSpace(CSIDL_COMMON_PROGRAMS)
Set objUsersProgramsFolder = objShell.NameSpace(CSIDL_PROGRAMS)

strAllUsersProgramsFolder = objAllUsersProgramsFolder.Self.Path

Set objFolder = objShell.Namespace(strAllUsersProgramsFolder & "\Accessories")
Set objFolderItem = objFolder.ParseName("Calculator.lnk")
Set colVerbs = objFolderItem.Verbs

For Each objVerb in colVerbs
If Replace(objVerb.name, "&", "") = "Pin to Start Menu" Then objVerb.DoIt
If Replace(objVerb.name, "&", "") = "Pin to Taskbar" Then objVerb.DoIt
Next

Download File PinItem.vbs




2 komentar :