Como criar um atalho para o computador na área de trabalho do usuário

Estou trabalhando em um VBScript que mostra o ícone "Computador" na área de trabalho. Consegui fazer um para o IE usando o código a seguir, no entanto, como Computador é uma "Pasta Especial" que parece não ter um local real, não posso usar o mesmo método. Alguém teria alguma idéia de como habilitá-lo via VBScript?

Código de atalho do IE:

Set objShell = WScript.CreateObject("WScript.Shell")
 'Create Shortcut for IE on desktop
 allUsersDesktop = objShell.SpecialFolders("AllUsersDesktop")
 usersDesktop = objShell.SpecialFolders("Desktop")
 Set objShortCut = objShell.CreateShortcut(usersDesktop & "\Internet Explorer.lnk")
 objShortCut.TargetPath = "C:\Program Files\Internet Explorer\iexplore.exe"
 objShortCut.Description = "Open Internet Explorer"
 objShortCut.Save

questionAnswers(3)

yourAnswerToTheQuestion