Crear un acceso directo desde script

Hash: SHA1

Set objShell = WScript.CreateObject("WScript.Shell")
strDesktopFolder = objShell.SpecialFolders("Desktop")
Set objShortCut = objShell.CreateShortcut(strDesktopFolder & _
"\C: Disk.lnk")
objShortCut.TargetPath = "c:\"
objShortCut.Description = "C: Disk"
objShortCut.HotKey = "Ctrl+Shift+C"
objShortCut.Save


Alejandro A. Ponicke
MCSA-MCSE-MCT-MVP
Buenos Aires-Argentina

"AntonioJ" wrote in message
news:

Hola a

¿Alguien sabe como crear un acceso directo, por ejemplo de una
carpeta, con un script o a través de un comando de la Shell?

He estado buscando por ahí y no he encontrado nada.

Gracias por vuestra ayuda.