Verknüpfung erzeugen

30/11/2007 - 11:23 von Markus Mannheim | Report spam
Hallo,

ich kàmpfe hier mit folgendem problem:
Ich möchte per Skript eine Verknüpfung erzeugen.
Da gelingt auch, nur der Inhalt des Ziels ist inkorrekt:

group = "Sales"

strPath=objShell.SpecialFolders("Desktop")
Set objShortcut =objShell.CreateShortcut(strPath & "\Gruppenlaufwerk.lnk")
With objShortcut
.Targetpath = "%systemroot%\explorer.exe /e,,\\server1\gruppen$\" &
group
.Save
End With

Die Verknüpfung wird erzeugt, aber das Ziel wir immer mit "" eingetragen:
"C:\WINDOWS\explorer.exe \e,,\desit004.sca.com\gruppen$\Sales"

Ohne die "" wüde es gehen:
C:\WINDOWS\explorer.exe \e,,\desit004.sca.com\gruppen$\Sales

Weiss jemand, wie ich das richtig mache?
Danke im voraus,

Gruß
Markus
 

Lesen sie die antworten

#1 Pegasus \(MVP\)
30/11/2007 - 12:09 | Warnen spam
"Markus Mannheim" wrote in message
news:uD$k%
Hallo,

ich kàmpfe hier mit folgendem problem:
Ich möchte per Skript eine Verknüpfung erzeugen.
Da gelingt auch, nur der Inhalt des Ziels ist inkorrekt:

group = "Sales"

strPath=objShell.SpecialFolders("Desktop")
Set objShortcut =objShell.CreateShortcut(strPath & "\Gruppenlaufwerk.lnk")
With objShortcut
.Targetpath = "%systemroot%\explorer.exe /e,,\\server1\gruppen$\" &
group
.Save
End With

Die Verknüpfung wird erzeugt, aber das Ziel wir immer mit "" eingetragen:
"C:\WINDOWS\explorer.exe \e,,\desit004.sca.com\gruppen$\Sales"

Ohne die "" wüde es gehen:
C:\WINDOWS\explorer.exe \e,,\desit004.sca.com\gruppen$\Sales

Weiss jemand, wie ich das richtig mache?
Danke im voraus,

Gruß
Markus



".Targetpath" ist wirklich nur für das Programm bestimmt, das Du aufrufen
willst. Wenn du zusàtzlich Parameter eingeben willst, dann musst Du sie
über ".arguments" festlegen.

Ähnliche fragen