Crea un nuevo acceso directo o abre uno ya existente.

objeto.CreateShortcut(cdnNombreRuta)

Argumentos

objeto

Objeto WshShell.

cdnNombreRuta

Cadena que indica el nombre de la ruta de acceso al acceso directo que se creará.

Comentarios

El método CreateShortcut devuelve un objeto WshShortcut o un objeto WshURLShortcut. Para crear un acceso directo no basta con llamar al método CreateShortcut. El objeto de acceso directo, así como los cambios realizados en él, se almacenan en la memoria hasta que se guardan en disco con el método Save. Para crear un acceso directo debe:

1. Crear una instancia de un objeto WshShortcut.
2. Inicializar sus propiedades.
3. Guardarlo en disco mediante el método Save.

   Nota   Un error habitual es incluir argumentos en la propiedad TargetPath del objeto de acceso directo, ya que esto no funciona. Todos los argumentos del acceso directo deben incluirse en la propiedad Arguments.

Ejemplo

El siguiente ejemplo crea un objeto WshShell y utiliza el método CreateShortcut para crear dos accesos directos.

<package>
   <job id="vbs">
      <script language="VBScript">
         set WshShell = WScript.CreateObject("WScript.Shell")
         strDesktop = WshShell.SpecialFolders("Desktop")
         set oShellLink = WshShell.CreateShortcut(strDesktop & "\Acceso directo a secuencia de comandos.lnk")
         oShellLink.TargetPath = WScript.ScriptFullName
         oShellLink.WindowStyle = 1
         oShellLink.Hotkey = "CTRL+SHIFT+F"
         oShellLink.IconLocation = "notepad.exe, 0"
         oShellLink.Description = "Acceso directo a secuencia de comandos"
         oShellLink.WorkingDirectory = strDesktop
         oShellLink.Save
         set oUrlLink = WshShell.CreateShortcut(strDesktop & "\Sitio Web de Microsoft.url")
         oUrlLink.TargetPath = "http://www.microsoft.com/spanish/"
         oUrlLink.Save
      </script>
   </job>

   <job id="js">
      <script language="JScript">
         var WshShell = WScript.CreateObject("WScript.Shell");
         strDesktop = WshShell.SpecialFolders("Desktop");
         var oShellLink = WshShell.CreateShortcut(strDesktop + "\\Acceso directo a secuencia de comandos.lnk");
         oShellLink.TargetPath = WScript.ScriptFullName;
         oShellLink.WindowStyle = 1;
         oShellLink.Hotkey = "CTRL+SHIFT+F";
         oShellLink.IconLocation = "notepad.exe, 0";
         oShellLink.Description = "Acceso directo a secuencia de comandos";
         oShellLink.WorkingDirectory = strDesktop;
         oShellLink.Save();
         var oUrlLink = WshShell.CreateShortcut(strDesktop + "\\Sitio Web de Microsoft.url");
         oUrlLink.TargetPath = "http://www.microsoft.com/spanish/";
         oUrlLink.Save();
      </script>
   </job>
</package>

Consulte también

Ejecutar sus secuencias de comandos | Objeto WshShortcut | Objeto WshUrlShortcut | Objeto WshShell