Script that will a correct explorer shortcut

This tweak was written by Kent Ruddick:

Running this script will create a new explorer icon on your desktop that will not open up on the pesky "My Documents" folder.

Just paste the following text into a file, and rename it explorershortcut.vbs, then double click on it.
- - - - - - - - - - - - - - - - - -
' A simple shortcut


' We create our first namespace and give it a reference

Set ws = WScript.CreateObject("WScript.Shell")





' Use the reference to access one of the methods.

dsktop = ws.SpecialFolders("Desktop")





' Set creates an object variable

set scut = ws.CreateShortcut (dsktop & "\Explorer.lnk")





' use the object variables method

scut.TargetPath = "%systemroot%\explorer.exe"


scut.Arguments = " /e,::{20d04fe0-3aea-1069-a2d8-08002b30309d}"



' Many objects need to be saved to write the information

scut.save
--------------------------------