title: Adding shortcut to All Users start menu
body: <p>I have a problem with creating a shortcut in the All Users start menu (<code>C:\ProgramData\Microsoft\Windows\Start Menu</code>).</p>
  
  <pre><code>Set wsc = WScript.CreateObject("WScript.Shell")
  Set lnk = wsc.CreateShortcut("C:\ProgramData\Microsoft\Windows\Start Menu\My app.LNK")
  
  lnk.targetpath = "C:\Program Files\my app\my  app.exe"
  lnk.workingdirectory = "C:\Program Files\my app" 
  lnk.save
  </code></pre>