per creare un link di tipo shortcut con un file o programma si utilizza questa sintassi


attento potrebbe dare problemi di sicurezza Windows Security
in questo caso va usato il comando DOS MKLINK
(vedi DOS - elenco comandi)

sintassi:
Set WshShell = CreateObject("Wscript.Shell") creo oggetto Wscript.Shell

Set OggettoLink = WshShell.CreateShortcut("path\file.lnk") creo oggetto Shortcut indicano path+file (indicare sempre estensione .lnk)
With OggettoLink
.TargetPath = "path + fileorigine.xxx" path + file di origine
.WorkingDirectory = "path origine" path di orgine
.Arguments = "..." eventuali armonenti aggiuntivi in caso di software (ex. -n -m)

.WindowStyle = x tipo di visualizzazione
  • 1 normale
  • 3 tutto schermo
  • 7 ad icona

.Description = "...." descrizione/commento

.Save salva l'oggetto link

End With
Set OggettoLink = Nothing cancella la memoria
Set WshShell = Nothing cancella la memoria


esempio
Set WshShell = CreateObject("Wscript.Shell")

Set oShellLink = WshShell.CreateShortcut("C:\Downloads\destinazione\ciao.lnk")
With oShellLink
.TargetPath = "C:\Downloads\test.txt"
.WorkingDirectory = "C:\Downloads\"
.WindowStyle = 3
.Description = "file testo prova"
.Save
End With
Set oShellLink = Nothing
Set WshShell = Nothing