1
Verknüfung von Ordner per Batch anlegen
Hi Leute,
und zwar habe ich folgendes Problem:
Ich habe einen Ordner und benötige noch dafür eine Verknüpfung in einem anderen Ordner. Diese Verknüpfung würde ich gerne per Batch anlegen.
Ich leider keinen Plan wie die ganze Sache realisieren soll. Vielleicht könnt ihr mir ja noch nen Tip geben!?
Danke schon mal!
und zwar habe ich folgendes Problem:
Ich habe einen Ordner und benötige noch dafür eine Verknüpfung in einem anderen Ordner. Diese Verknüpfung würde ich gerne per Batch anlegen.
Ich leider keinen Plan wie die ganze Sache realisieren soll. Vielleicht könnt ihr mir ja noch nen Tip geben!?
Danke schon mal!
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 94871
Url: https://administrator.de/forum/verknuefung-von-ordner-per-batch-anlegen-94871.html
Ausgedruckt am: 16.02.2025 um 20:02 Uhr
1 Kommentar
Hi,
Google hätte Dir da besitmmt auch geholfen, aber hier der Code für Dich
"SHELL32.dll, 3" gibt dier das Iconsymbol für den Ordner.
set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop _
& "\Automatischer Link.lnk")
oShellLink.TargetPath = "Hier der Pfad, z.B. S:\ordnerßunterordenr\ziel\"
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "CTRL+SHIFT+F"
oShellLink.IconLocation = _
"SHELL32.dll, 3"
oShellLink.Description = "Hier Dein Name für den Link"
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save
Diese script mit der Endung .vbs speichern
Google hätte Dir da besitmmt auch geholfen, aber hier der Code für Dich
"SHELL32.dll, 3" gibt dier das Iconsymbol für den Ordner.
set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop _
& "\Automatischer Link.lnk")
oShellLink.TargetPath = "Hier der Pfad, z.B. S:\ordnerßunterordenr\ziel\"
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "CTRL+SHIFT+F"
oShellLink.IconLocation = _
"SHELL32.dll, 3"
oShellLink.Description = "Hier Dein Name für den Link"
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save
Diese script mit der Endung .vbs speichern
