Automate Quick Launch Pinned Items at Logon

We have a group that wants certain pinned items (shortcut to apps) in their taskbar when they login to their Windows 7 Machine.  Is there a good way of doing this utilizing a script on Windows 7?  They want Microsoft Word, Excel, and other 3rd party apps pinned automatically without user intervention.
LVL 1
mystikal1000Asked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
zalazarConnect With a Mentor Commented:
The following visual basic script will pin Word 2010 and Excel 2010 to the taskbar.
You can easily modify the path for e.g. Word or Excel 2013 or add extra 3rd party apps.
'*********************************************************************
'* Pin Shortcuts
'*********************************************************************
Const PinTask = "Pin to Taskbar"
Const PinStart = "Pin to Start Menu"
Const UnpTask = "Unpin from Taskbar"
Const UnpStart = "Unpin from Start Menu"

Dim fso, objShell, strShortcut

Set fso = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("Shell.Application")

' Pin Word 2010 to taskbar
strShortcut = "C:\Program Files (x86)\Microsoft Office\Office14\WINWORD.EXE"
call PinItem(strShortcut, PinTask)

' Pin Excel 2010 to taskbar
strShortcut = "C:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXE"
call PinItem(strShortcut, PinTask)


Set objShell = Nothing
Set fso = Nothing

Wscript.quit 0
'---------------------------------------------------------------------
' --------  SUBS  --------
'---------------------------------------------------------------------
Sub PinItem(sShortcut, sPinType)
  Dim sFolderPath, sFileName
  Dim objFolder, objFolderItem, colVerbs, objVerb

  If fso.FileExists(sShortcut) = False Then
    Exit Sub
  End If

  sFolderPath = fso.GetParentFolderName(sShortcut)
  sFileName = fso.GetFileName(sShortcut)

  Set objFolder = objShell.Namespace(sFolderPath)
  Set objFolderItem = objFolder.ParseName(sFileName)
  Set colVerbs = objFolderItem.Verbs
  For Each objVerb in colVerbs
    If Replace(objVerb.name, "&", "") = sPinType Then objVerb.DoIt
  Next

  Set colVerbs = Nothing
  Set objFolderItem = Nothing
  Set objFolder = Nothing
End Sub

Open in new window

0
 
jcimarronCommented:
mystikal1000 --
I do not do script, but if you right click just about any .exe file you will be offered "Pin to Taskbar " and "Pin to Start Menu"

The location of those two items is
"C:\Users\EQUUS\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned\StartMenu"

"C:\Users\EQUUS\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar"
0
 
Dash AmrSenior Specialist(PM)Commented:
Windows 7 task-bar pinned icons are stored in the following locations:
 
File System:
%APPDATA%\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar

Registry:
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband]
 
To deploy it, you can perform the following steps:
1.    Configure Pinned items on a Windows 7 system as a reference computer.

2.    Export Reigstry Key to pinned.reg file:
 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband]
 
And copy items in the "%APPDATA%\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar" to a shared folder.
 
3.    Create a logon script to deploy the registry keys and copy the corresponding files.

 Please note that the “%APPDATA%\Microsoft\Internet Explorer\Quick Launch\User Pinned” folder is only created after a user has pinned an icon to the taskbar. In the logon script, you will need to create the “%APPDATA%\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar” folder if it does not exist.

I hope this Helps :)
Reference:
http://social.technet.microsoft.com/Forums/windowsserver/en-US/d172b4de-be7c-4149-8958-bebfe042ade1/forum-faq-how-to-deploy-windows-7-taskbar-pinned-icons-by-group-policy?forum=winserverGP
0
Has Powershell sent you back into the Stone Age?

If managing Active Directory using Windows Powershell® is making you feel like you stepped back in time, you are not alone.  For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why.

 
RobSampsonCommented:
Hi, check out the article here as well:

Pin and Unpin Start Menu and Taskbar Items in Windows 7
http://blog.experts-exchange.com/ee-blog/pin-unpin-start-menu-taskbar-items-windows-7/

It's a pretty flexible method that should work for you.

Regards,

Rob.
0
 
zalazarCommented:
Hello mystikal1000, good that you have a solution.
Was my script not suitable for the task you requested ?
0
 
mystikal1000Author Commented:
Zalazar - whoops I wanted to give you the points, that's my mistake.
0
 
zalazarCommented:
Hello mystikal1000, thanks for your response and good to know that the script is suitable.
Thanks also for creating the "Request For Attention".
0
All Courses

From novice to tech pro — start learning today.