Permite crear un acceso directo mediante programación.

Ejemplo

El siguiente ejemplo muestra la creación de un acceso directo a la secuencia de comandos que se está ejecutando:

<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
      </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();
      </script>
   </job> 
</package>

Propiedades

Propiedad Arguments | Propiedad Description | Propiedad FullName (objeto WshShortcut) | Propiedad Hotkey | Propiedad IconLocation | Propiedad TargetPath | Propiedad WindowStyle | Propiedad WorkingDirectory

Métodos

Método Save

Consulte también

Ejecutar sus secuencias de comandos | Método CreateShortcut