Crée une référence d'objet à un raccourci ou à un raccourci d'URL.
object.CreateShortcut(strPathname)
object
Objet WshShell.
strPathname
Chemin d'accès et nom de fichier du raccourci en cours de création.
La méthode CreateShortcut crée un objet WshShortcut et le renvoie. Cette méthode peut être utilisée pour créer un nouveau raccourci ou ouvrir un raccourci existant afin d'en modifier les propriétés. Un raccourci Windows doit porter l'extension ".lnk". Si le titre du raccourci se termine par ".url", un objet WshURLShortcut est créé.
L'exemple suivant illustre l'utilisation d'un fichier .wsf unique pour deux tâches dans différents langages de script (VBScript et JScript). La fonctionnalité de ces deux tâches est identique : chacune crée un raccourci pointant vers le script en cours d'exécution et un raccourci d'URL pointant vers www.microsoft.com :
<package>
<job id="vbs">
<script language="vbscript">
set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Shortcut Script.lnk")
oShellLink.TargetPath = WScript.ScriptFullName
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "CTRL+SHIFT+F"
oShellLink.IconLocation = "notepad.exe, 0"
oShellLink.Description = "Raccourci script"
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save
set oUrlLink = WshShell.CreateShortcut(strDesktop & "\Microsoft Web Site.url")
oUrlLink.TargetPath = "http://www.microsoft.com"
oUrlLink.Save
</script>
</job>
<job id="js">
<script language="javascript">
var WshShell = new ActiveXObject("WScript.Shell");
strDesktop = WshShell.SpecialFolders("Desktop");
var oShellLink = WshShell.CreateShortcut(strDesktop + "\\Shortcut Script.lnk");
oShellLink.TargetPath = WScript.ScriptFullName;
oShellLink.WindowStyle = 1;
oShellLink.Hotkey = "CTRL+SHIFT+F";
oShellLink.IconLocation = "notepad.exe, 0";
oShellLink.Description = "Raccourci script";
oShellLink.WorkingDirectory = strDesktop;
oShellLink.Save();
var oUrlLink = WshShell.CreateShortcut(strDesktop + "\\Microsoft Web Site.url");
oUrlLink.TargetPath = "http://www.microsoft.com";
oUrlLink.Save();
</script>
</job>
</package>
Pour plus d'informations, reportez-vous à la rubrique Exécution de vos scripts.
WshShortcut, objet | WshUrlShortcut, objet
Application : WshShell, objet