Removing Programs folder and Quick Launch bar

  • Thread starter Thread starter Scott Elgram
  • Start date Start date
S

Scott Elgram

Greetings,
I am in need of a way, either through script or group policy, to remove
the programs folder from the start menu and quick launch from the task bar.
I am using windows 2000 in a windows 2000 server domain.
Any help would be greatly appreciated.

thanks
 
To remove Programs from Start Menue

User Configuration->Administrative Templates->Start Menue & Task Bar->
Remove all programs list from start menu

Not sure if you can remove quick launce by GP, but a script would definetly
do it for you

Save with a .vbs extension and apply to your GPO in the User configuration
as Logon script

'**SCRIPT START
Dim oFSO
Dim oShell
Dim sAppData

Set oFSO=CreateObject("scripting.filesystemobject")
Set oShell=CreateObject("wscript.shell")
sAppData=oShell.ExpandEnvironmentStrings("%AppData%")

oFSO.DeleteFolder sAppData & "\Microsoft\Internet Explorer\Quick
Launch",true
'**SCRIPT END

Good luck

Niclas Lindblom
 
Thanks much for the script. I haven't had time to give it a try yet
though, I'll have to get back to you on that. However, the "Remove all
programs list from start menu" only removes the program from the "all users"
profile. I need to block everything from both the users profile and the all
users profile. Essentially all the user has in their start menu is "Log
Off". In the past I have achieved this by setting the up the computer for a
user under this GP and deleting the programs folder and quick launch folder
but due to an increase of hires and people moving this is no longer
feasible.

--
-Scott Elgram

MS Newsgroups said:
To remove Programs from Start Menue

User Configuration->Administrative Templates->Start Menue & Task Bar->
Remove all programs list from start menu

Not sure if you can remove quick launce by GP, but a script would definetly
do it for you

Save with a .vbs extension and apply to your GPO in the User configuration
as Logon script

'**SCRIPT START
Dim oFSO
Dim oShell
Dim sAppData

Set oFSO=CreateObject("scripting.filesystemobject")
Set oShell=CreateObject("wscript.shell")
sAppData=oShell.ExpandEnvironmentStrings("%AppData%")

oFSO.DeleteFolder sAppData & "\Microsoft\Internet Explorer\Quick
Launch",true
'**SCRIPT END

Good luck

Niclas Lindblom
Click to expand...
 
OK,

Perhaps we could just extend the script a bit to take care of the deletion
of the programs folder as well. I have not tested this myself, but have a go
and see if it works

'**SCRIPT START
Dim oFSO
Dim oShell
Dim sAppData
Dim sProfile

Set oFSO=CreateObject("scripting.filesystemobject")
Set oShell=CreateObject("wscript.shell")
sAppData=oShell.ExpandEnvironmentStrings("%AppData%")
sProfile=oShell.ExpandEnvironmentStrings("%USERPROFILE%")

If oFSO.FolderExists(sAppData & "\Microsoft\Internet Explorer\Quick Launch")
=True Then
oFSO.DeleteFolder sAppData & "\Microsoft\Internet Explorer\Quick
Launch",True
End If

If oFSO.FolderExists(sProfile & "\Start Menu\Programs")=True Then
oFSO.DeleteFolder sProfile & "\Start Menu\Programs",True
End if

'**SCRIPT END

Regards

Niclas Lindblom

Scott Elgram said:
Thanks much for the script. I haven't had time to give it a try yet
though, I'll have to get back to you on that. However, the "Remove all
programs list from start menu" only removes the program from the "all users"
profile. I need to block everything from both the users profile and the all
users profile. Essentially all the user has in their start menu is "Log
Off". In the past I have achieved this by setting the up the computer for a
user under this GP and deleting the programs folder and quick launch folder
but due to an increase of hires and people moving this is no longer
feasible.
Click to expand...
 
Niclas Lindblom,
Thanks for the updated script......It seems to have done it's job with
the programs folder but the quick launch still remains for accounts that are
new the a machine. I am assuming this is because the quick launch folder is
created after scripts are run. Also, Norton doesn't like the script either.
I may have to find some other way of accomplishing this task. I am looking
into an MSI file that will delete folders, I'm not sure if it will work
though.

Thanks a lot for your help....if you have any other ideas on how I could do
this it would be appreciated.

thanks again
 
Hmm,

Not sure about how to get around the issue with new profiles. To get around
the problem with NAV, you could perhaps compile this into a .Net assembly if
you are familiar with how to do that, and create a .MSI to install the
application, then execute through the registry run key. If you believe this
would bring you forward, I can write you some .net code to do the job, Just
let me know

Regards

Niclas
 
Back
Top