Mit Visual Basic Script Verknüpfungen auf Desktop erstellen

Verknüpfung erstellen mit VBScript

4
(3)

Mit Visual Basic Script Verknüpfungen auf Desktop erstellen

VBScript können überall dort eingesetzt werden, wo automatisierte Aufgaben erforderlich sind. Die Anwendung von Batchdateien ist nicht immer das geeignete Mittel, und der Einsatz von Gruppenrichtlinien steht nicht überall zur Verfügung, hier kann ein Visual Basic Script diese Aufgabe übernehmen, beispielsweise um Verknüpfungen zu Anwendungen für Benutzer bereitzustellen.

create-shortcut.vbs

Das folgende VBScript erstellt eine Verküpfung (shortcut) auf dem Desktop, hier zum Beispiel für den Windows Rechner.

Die VBScript Zeilen durch  Copy Paste in Notepad einfügen und als Datei create-shortcut.vbs speichern, und mit einem Doppelklick die Verknüpfung erstellen.
' VBScript to created shortcut
Const strProgramTitle = "Shortcut to Calculator"
Const strProgram = "%SystemRoot%\System32\calc.exe"
Const strWorkDir = "%USERPROFILE%"
Dim objShortcut, objShell
Set objShell = WScript.CreateObject ("Wscript.Shell")
strLPath = objShell.SpecialFolders ("Desktop")
Set objShortcut = objShell.CreateShortcut (strLPath & "\" & strProgramTitle & ".lnk")
objShortcut.TargetPath = strProgram
objShortcut.WorkingDirectory = strWorkDir
objShortcut.Description = strProgramTitle
objShortcut.Save
WScript.Quit

  Zu guter letzt, die Const Zeilen im Script können editiert werden, für beliebige weitere Anwendungen.

Die auf dem Desktop erstellte Verknüpfung nun ausführen um den Windows Rechner zu öffnen.

C:\> cscript //Nologo //B create-shortcut.vbs

Aus der Eingabeaufforderung oder aus einer Batch kann dieses VBScript mit cscript gestartet werden.

Wie hilfreich war dieser Beitrag?

Klicke auf die Sterne um zu bewerten!

Durchschnittliche Bewertung 4 / 5. Anzahl Bewertungen: 3

Bisher keine Bewertungen! Sei der Erste, der diesen Beitrag bewertet.

Es tut uns leid, dass der Beitrag für dich nicht hilfreich war!

Lasse uns diesen Beitrag verbessern!

Wie können wir diesen Beitrag verbessern?

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert