4
Sbs 2003 Datei auf allen Clientdesktops
Hallo,
ich möchte gerne das auf dem Desktop eines jeden
Benutzers standartmäßig eine Verknüpfung zu einer
Excel-Datei liegt. Das Original der Verknüpfung befindet
sich auf dem SBS-Server in einem freigegebenen Verzeichnis.
Die Benutzer sollen diese Verknüpfung nicht löschen
können.
Kann man soetwas realisieren?
Gruß Jürgen
ich möchte gerne das auf dem Desktop eines jeden
Benutzers standartmäßig eine Verknüpfung zu einer
Excel-Datei liegt. Das Original der Verknüpfung befindet
sich auf dem SBS-Server in einem freigegebenen Verzeichnis.
Die Benutzer sollen diese Verknüpfung nicht löschen
können.
Kann man soetwas realisieren?
Gruß Jürgen
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: 150759
Url: https://administrator.de/contentid/150759
Printed on: April 19, 2024 at 14:04 o'clock
4 Comments
Latest comment
Hallo,
Peter
Zitat von @juergwin:
Excel-Datei liegt. Das Original der Verknüpfung befindet
sich auf dem SBS-Server in einem freigegebenen Verzeichnis.
Eine Verküpfung in z.B. bei Windows 7 "C:\Users\Public\Desktop" rein kopieren.Excel-Datei liegt. Das Original der Verknüpfung befindet
sich auf dem SBS-Server in einem freigegebenen Verzeichnis.
Die Benutzer sollen diese Verknüpfung nicht löschen
können.
Nur das Recht für Lesen und Ausführen erteilen.können.
Peter
oder per VB-Loginscript:
Beispiel (hab mal direkt einen Auszug meines Loginscripts gezogen; Zeilen 1-10 entsprechend mod'n):
Das Working-Directory ist optional zu betrachten; auch das Icon. Ich hab das mir noch mit if-Abfragen gelöst (so das nur User einer bestimmten AD-Group das Icon bekommen).
Good luck!
Frank!
Beispiel (hab mal direkt einen Auszug meines Loginscripts gezogen; Zeilen 1-10 entsprechend mod'n):
Dim WshNetwork, WshShell
Dim objNetwork
Dim objFSO, objFileCopy
Dim strFilePath, strDestination
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objNetwork = CreateObject("WScript.Network")
Set WshNetwork = WScript.CreateObject("WScript.Network")
Set WshShell = WScript.CreateObject("WScript.Shell")
Set oDrives = WshNetwork.EnumNetworkDrives
on error resume next
Set VbsObj = CreateObject("WScript.Shell")
ShortCutPath = VbsObj.SpecialFolders ("Desktop")
ShortCutName = "Mein-Eigener-Link"
Set MyShortcut = VbsObj.CreateShortcut(ShortCutPath & "\" & ShortCutname & ".lnk")
MyShortcut.TargetPath = "\\Servername\sharename\Application.xls"
MyShortcut.WorkingDirectory = "\\Servername\sharename\"
MyShortcut.IconLocation = "\\Servername\sharename\MyOwnIcon.ico"
MyShortcut.Save
end ifDas Working-Directory ist optional zu betrachten; auch das Icon. Ich hab das mir noch mit if-Abfragen gelöst (so das nur User einer bestimmten AD-Group das Icon bekommen).
Good luck!
Frank!
Grundsätzlich wäre es doch das Einfachste, die Verknüpfung im Allusersdesktop abzulegen. Da hat ohnehin kein normaler Benutzer Schreibrecht drauf. Um das dann automastisch hinzukriegen, müsstest du das Script als Computerrichtlinie beim Hochfahren ausführen lassen. DAs normale Anmeldescript wird im Kontext des Benutzers ausgeführt und da der auf dem Ordner eben kein Schreibrecht hat, würde es nicht klappen.
Da tuts dann übringens auch ein einfaches "copy"...
Da tuts dann übringens auch ein einfaches "copy"...
if not exist %allusersprofile%\Desktop\MeineVerknüpfung.lnk copy \\server\share\MeineVerknüpfung.lnk %allusersprofile%\Desktop
... und da wir noch immer nicht wissen, welches OS auf den Clients verwendet wird, zur Sicherheit:
(wobei hoffentlich keine Umlaute vorkommen werden) ...
Grüße
bastla
if not exist "%allusersprofile%\Desktop\MeineVerknüpfung.lnk" copy "\\server\share\MeineVerknüpfung.lnk" "%allusersprofile%\Desktop"
Grüße
bastla
