View Single Post
Old 10-24-2007   #8 (permalink)
piaqt


 
 

RE: SendTo context menu shortcuts not showing

....and I spent a week playing email tag with MS tech support. Don'cha just
love it when we're better at this than they are?
--
piaqt
http://www.techzonez.com/forums/forumdisplay.php?f=64


"misc5" wrote:
Quote:

> thanks piaqt - it was staring me in the face all along - I'd come across the
> xp version of this script previously :/
>
> for those who will undoubtably follow after us with this, comment out the on
> error resume next line (i.e. insert an apostrope at the beginning of the
> line) to ensure you recieve any errors that arise during the execution of the
> script, otherwise you just get a success message even when the script fails
>
> chances are unless you have user account control tunred off you'll need to
> run this vbs as an administrator, so follow these steps:
> save the script to the root of c: (makes life easier)
> follow the instructions here to open an admin cmd prompt:
> http://itsvista.com/2006/12/itsvista...administrator/
> cd / (to the root of c
> then run the vbs
> all being well you'll have no problems
>
> alternatively you can just edit your registry manually
>
>
>
> "piaqt" wrote:
>
Quote:

> > Edited to work on vista, here's the fix. Save the below with a .vbs extension.
> > '--------------------------------------------------------------------
> > 'Applies To : Microsoft Windows XP
> > 'Author : Ramesh Srinivasan - Microsoft MVP (Windows XP Shell)
> > 'Created on : February 19, 2005
> > 'Description : Fixes the Send To menu (missing all the shortcuts)
> > 'Homepage : http://windowsxp.mvps.org
> > 'More Info : http://windowsxp.mvps.org/sendtofix.htm
> > 'Requirement : Needs Administrative privileges in Windows XP
> > '--------------------------------------------------------------------
> >
> > Set WshShell = CreateObject("WScript.Shell")
> > USFolderPath = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User
> > Shell Folders"
> > On Error resume next
> > WshShell.RegWrite "HKCR\exefile\shellex\DropHandler\",
> > "{86C86720-42A0-1069-A2E8-08002B30309D}", "REG_SZ"
> > WshShell.RegWrite "HKCR\lnkfile\shellex\DropHandler\",
> > "{00021401-0000-0000-C000-000000000046}", "REG_SZ"
> > WshShell.RegWrite USFolderPath & "\SendTo",
> > "%USERPROFILE%\AppData\Roaming\Microsoft\Windows\SendTo", "REG_EXPAND_SZ"
> > Wshshell.RUN ("regsvr32.exe shell32.dll /i /s")
> > MsgUser = Msgbox ("Fixed the Send To menu. Restart Windows for the changes
> > to take effect", 4160, "'Send To' menu fix for Windows XP - Ramesh
> > Srinivasan")
> > Set WshShell = Nothing
> > --
> > piaqt
> > http://www.techzonez.com/forums/forumdisplay.php?f=64
> >
My System SpecsSystem Spec