Inloggen Geen profiel? Registreer hier.

Aanmaak desktopshortcuts via logon-script

Auteur Bericht
Kevin White V-ICT-OR Lid
Posts
29
Organisaties
Stadsbestuur Poperinge
#1 — 01/07/2005 08:53
Beste collega's,

Om het 'per ongeluk' verwijderen van snelkoppelingen op het bureaublad te voorkomen, zijn wij op zoek om via het logon-script automatisch de snelkoppelingen terug te laten aanmaken. Weet soms iemand hoe je met een commando dit zou kunnen laten gebeuren vanuit het logon-script?

Met vriendelijke groeten,
Kevin White
 
Posts
16
Organisaties
B.A.
#2 — 03/07/2005 22:47

Weet soms iemand hoe je met een commando dit zou kunnen laten gebeuren vanuit het logon-script?


Gewoon :
- maak de links aan op één desktop
- kopieer de juiste .lnk-files naar een directory op de server
- creëer dan een login.bat-script met daarin
- copy /directory/*.lnk desktop/ (de juiste locaties hangen af van jouw omgeving)

En dat zou moeten werken... Of het de beste oplossing onder windows is weet ik niet als overtuigd open source adept :D

Jan Guldentops
BA N.V.
j@ba.be

-------------------------------------- Jan Guldentops ( j@ba.be )

 
Eddy Van der Stock V-ICT-OR Lid
Posts
57
Organisaties
V-ICT-OR vzw, VlaVirGem en Buyit2
#3 — 04/07/2005 08:32
Kevin,

Je kan ook een *.vbs file creëren en opnemen at login :

Vul deze als volgt - copy / paste (let wel hier is het een snelkoppeling naar notepad) :
--------------------------------------
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")


Dim MyShortcut, MyDesktop, DesktopPath

' Read desktop path using WshSpecialFolders object
DesktopPath = WSHShell.SpecialFolders("Desktop")

' Create a shortcut object on the desktop
Set MyShortcut = WSHShell.CreateShortcut(DesktopPath & "\Shortcut to notepad.lnk")

' Set shortcut object properties and save it
MyShortcut.TargetPath = WSHShell.ExpandEnvironmentStrings("%windir%\notepad.exe")
MyShortcut.WorkingDirectory = WSHShell.ExpandEnvironmentStrings("%windir%")
MyShortcut.WindowStyle = 4
MyShortcut.IconLocation = WSHShell.ExpandEnvironmentStrings("%windir%\notepad.exe, 0")
MyShortcut.Save

WScript.Echo "A shortcut to Notepad now exists on your Desktop."

------------------
De laatste regel hoeft niet echt ...

succes ...