If you are managing your desktops with ZENworks you may wish to have better control over icons that are placed on a users desktop from the All Users Desktop. This tip is a simple demonstration on how you can easily script deletion of files from AllUsersDesktop.
If users need additional rights to do this, as is likely, from More Options you can select run as Administrator.
The code of the script is below:
Dim oShell, oSpecialFolders, oURL, oAllUsers,oFSO, OFC, file
Set oFSO = createobject("Scripting.FileSystemObject")
set oShell = createobject("WScript.shell")
Set oSpecialFolders = oShell.SpecialFolders
set oAllUsers = oFSO.GetFolder( oSpecialFolders("AllUsersDesktop") )
Set OFC = oAllUsers.Files
For Each file In OFC