Verknüpfung mit vbs funktioniert nicht richtig
Hallo zusammen,
ich versuche derzeit ein .vbs Script zu erstellen, welches eine Desktopverknüpfung unter "All Users\Desktop" anlegen soll. Soweit funktioniert auch alles, ich habe jedoch ein Problem mit dem Zielpfad.
Das Script sieht derzeit so aus:
Das Programm ist lokal installiert, soll jedoch die Konfigurationsdatei vom File Server nutzen. Mein Problem ist jetzt, dass im Zielpfad er Verknüpfung
"C:\Programme\Programm.exe" "\fileserver\Pfad\Konfigurationsdatei"
steht. Es fehlt also ein Backslash. Wenn ich ihn anschließend händisch hinzufüge funktioniert alles wie gewünscht. Das einzige Problem ist also dieser Backslash.
Kann mir jemand sagen wie ich dieses Problem löse?
Vielen Dank schonmal.
Const strProgramtitel=""
Dim objShortcut
Dim objShell
Set objShell= WScript.CreateObject("Wscript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
strLPfad=objShell.SpecialFolders("AllUsersDesktop")
Set objShortcut=objShell.CreateShortcut("C:\Dokumente und Einstellungen\All Users\Desktop\Verknüpfung.lnk")
objShortcut.TargetPath= """C:\Programme\Programm.exe""" + " ""\\fileserver\Pfad\Konfigurationsdatei"""
objShortcut.Description= "Beschreibung"
objShortcut.IconLocation = "\\fileserver\icon.ico"
objShortcut.WorkingDirectory = "C:\Windows\Temp"
objShortcut.Save
"C:\Programme\Programm.exe" "\fileserver\Pfad\Konfigurationsdatei"
steht. Es fehlt also ein Backslash. Wenn ich ihn anschließend händisch hinzufüge funktioniert alles wie gewünscht. Das einzige Problem ist also dieser Backslash.
Kann mir jemand sagen wie ich dieses Problem löse?
Vielen Dank schonmal.
5 Antworten
- LÖSUNG bastla schreibt am 02.11.2011 um 12:03:14 Uhr
- LÖSUNG MrCrabs schreibt am 02.11.2011 um 13:05:16 Uhr
- LÖSUNG Skyemugen schreibt am 02.11.2011 um 12:11:25 Uhr
- LÖSUNG bastla schreibt am 02.11.2011 um 12:16:59 Uhr
- LÖSUNG MrCrabs schreibt am 02.11.2011 um 13:18:57 Uhr
- LÖSUNG bastla schreibt am 02.11.2011 um 12:16:59 Uhr
LÖSUNG 02.11.2011 um 12:03 Uhr
LÖSUNG 02.11.2011 um 12:11 Uhr
Aloha,
mit unseren Codeformatierungen
sähe dein kleines Skript natürlich noch schöner aus im Forum, siehe Formatierungshilfe 
greetz André
P.S.: Da bastla schneller war ... wollte ich mir die Formatierung nicht nehmen lassen ^__^
P.P.S: Chr(34) & "dasganzeZeugs" & Chr(34) sieht i.d.R. strukturierter aus als """dasganzeZeugs""" gerade wenn sich solche Sachen in einer Zeile häufen
mit unseren Codeformatierungen
objShortcut.Arguments = """\\fileserver\Pfad\Konfigurationsdatei"""
greetz André
P.S.: Da bastla schneller war ... wollte ich mir die Formatierung nicht nehmen lassen ^__^
P.P.S: Chr(34) & "dasganzeZeugs" & Chr(34) sieht i.d.R. strukturierter aus als """dasganzeZeugs""" gerade wenn sich solche Sachen in einer Zeile häufen
LÖSUNG 02.11.2011 um 12:16 Uhr
LÖSUNG 02.11.2011 um 13:05 Uhr
LÖSUNG 02.11.2011 um 13:18 Uhr
Das mit dem Chr(34) hatte ich schon gesehen gehabt, habe jedoch nicht verstanden wie ich das einzusetzen habe. Als ich versucht habe das so zu schreiben hat das Skript mir anstelle der Anführungszeichen das Chr(34) in die Zeilen der Verknüpfung geschrieben, welche wiederum nichts damit anzufangen wusste und einfach nicht mehr funktioniert hat.
Aber trotzdem danke für den Tipp
Aber trotzdem danke für den Tipp