All User Verknüpfung auswechseln

  • #1
R

rloosli

Neues Mitglied
Themenersteller
Dabei seit
16.02.2006
Beiträge
1
Reaktionspunkte
0
Hallo zusammen

Ich muss bei über 100 Arbeitsplätzen eine Desktopverknüpfung welche im All User Verzeichnis steht austauschen.

Wie kann ich das am besten über einen Batch machen, welchen ich dann in das Loginscript einbinde ?

Besten Dank
 
  • #2
Hallo,

ich würde erst den alten Link löschen und dann den neuen erstellen:

Wenn du den alten Link löschen möchtest:

Code:
Set Shell = CreateObject(WScript.Shell) 
Set FSO = CreateObject(Scripting.FileSystemObject) 
Pfad = WshShell.SpecialFolders(Desktop) 
FSO.DeleteFile Pfad & \Verknüpfung.lnk

Hierbei musst du nur in der 4. Zeile den Name der Verknüpfung anpassen sowie falls notwendig in der 3. Zeile den Pfad (ohne \) (im Beispiel ist der Desktop des aktuellen Benutzers eingestellt).

Möchtest du eine neue Verknüpfung erstellen:
Code:
set WshShell = WScript.CreateObject(WScript.Shell) 
strDesktop = WshShell.SpecialFolders(Desktop) 
set oShellLink = WshShell.CreateShortcut(strDesktop & \Shortcut Script.lnk) 
oShellLink.TargetPath = WScript.ScriptFullName 
oShellLink.WindowStyle = 1 
oShellLink.Hotkey = CTRL+SHIFT+F 
oShellLink.IconLocation = notepad.exe, 0 
oShellLink.Description = Shortcut Script 
oShellLink.WorkingDirectory = strDesktop 
oShellLink.Save

Hierbei ist der der Pfad in der 2. Zeile strDesktop festgelegt (kann einfach abgeändert werden, ohne \ am Ende).
In Zeile 3 Set oShellLink wird der Name des Links festgelegt.
Das Ziel der Verknüpfung wird in Zeile 4 TargetPath festgelegt (zeigt hier auf die ausführende Batch-Datei).
Zeile 5 WindowStyle zeigt an, wie Windows das Ziel beim Laden öffnet (0 ist Standard-Einstellung: Normales Fenster)
Zeile 6 Hotkey enthält den gewünschten Hotkey.
Zeile 7 Description eine kurze Beschreibung der Verknüpfung.
Zeile 8 WorkingDirectory zeigt auf das Verzeichnis, in dem das Ziel !!!! der Verknüpfung läuft. Schau dir einfach mal ein paar Verknüpfungen des PCs an (Ausführen in:. Der Eintrag ist aber nicht immer notwendig, ich weiß allerdings auch nicht wann er nötig ist. :-(
Die letzte Zeile speichert die Verknüpfung einfach.


Wenn du mal eine Verknüpfung mit dem Internet erstellen musst:
Code:
set oUrlLink = WshShell.CreateShortcut(strDesktop & \Microsoft Web Site.url) 
oUrlLink.TargetPath = [url]http://www.microsoft.com/germany[/url] 
oUrlLink.Save

Ist eigentlich dasselbe wie oben, nur das es weniger Einstellungen gibt.


Jetzt muss der entsprechende Script nur noch in einer *.vbs Datei gespeichert werden und dann als LogIn-Script eingebunden werden.

Schöne Grüße
Danny85
 
Thema:

All User Verknüpfung auswechseln

ANGEBOTE & SPONSOREN

Statistik des Forums

Themen
113.840
Beiträge
707.963
Mitglieder
51.494
Neuestes Mitglied
Flensburg45
Oben