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!
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 94871
Url: https://administrator.de/contentid/94871
Printed on: April 24, 2024 at 06:04 o'clock
1 Comment
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
