Version: 23.4 RC1
Revision: 65 Build 135
Reorganize Start Menu and IE Favourites quickly.
OS compatible: Windows XP
Service Packs: SP2 and SP3.
Introductions: As I was installing applications, tools and opening files or executable, I was boiling to put my Start Menu and Favourites organized! But, I hate to waist my time looking through all of the registry and other subfolders! So, I decided to use my ‘VBscript’ skills to invent a source that would delete the following keys after reboot. *Sigh* what a drag…
After three days strolling through my VBS – Library, I’ve snipped some codes from my old scripts and attach them to my new script. This will reduce my time and stress to create a very simple utility that would sort these following categories. However, once you have executed the script, you have to reboot your computer! But, don’t worry; the registry folder will regenerate when you click on the ‘Start’ icon – after reboot. Still, this script is un-compatible with Windows 2000 and Server edition – Tuff luck guys!
———————-
Internet Explorer Favourites – Menu Order.
Start Menu – Menu Order.
Start Menu + Programs – Menu Order.
———————-
1.] Download one of these notepad applications. But, if you haven’t downloaded them, please use one of the links that is provided.
———————————
Notepad++ [http://www.mediafire.com/?tweezy1txbe]
Gvim Notepad [http://www.mediafire.com/?kxgmtimmi22]
———————————
2.] Copy and paste one of these codes into notepad.
Warning: Please don’t copy: [****] into your notepad, or else, it will not work!
******************************************************
‘This script will Purge “Start Menu and Favorites”.
‘Author: Lair360
‘Version: 31 RC1
‘Revision: 124 Build 2
‘———————————————————————————-
On Error Resume Next
Private Const HKEY_CURRENT_USER = &H80000001
strComputer = “.”
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Explorer\MenuOrder\”
‘———————————————————————————-
Set objRegistry = GetObject(“winmgmts:\\” & _
strComputer & “\root\default:StdRegProv”)
DeleteSubkeys HKEY_CURRENT_USER, strKeypath
Sub DeleteSubkeys(HKEY_CURRENT_USER, strKeyPath)
objRegistry.EnumKey HKEY_CURRENT_USER, strKeyPath, arrSubkeys
If IsArray(arrSubkeys) Then
For Each strSubkey In arrSubkeys
DeleteSubkeys HKEY_CURRENT_USER, strKeyPath & “\” & strSubkey
Next
End If
objRegistry.DeleteKey HKEY_CURRENT_USER, strKeyPath
End Sub
WScript.Echo “Start Menu and Favorites are organized!”
WScript.Echo “Please reboot your computer…”
******************************************************
3.] Go to: File >> Save As.
4.] Put a specific name for the codes and input the extension at the end.
The script extension is: .vbs
Example: Clear_Urls_and_History.vbs
5.] Hit the save button and execute the script.
Notes: If there is an error with the code, or you have done something wrong, please download the original VBScript.
3.] Go to: File >> Save As.
4.] Put a specific name for the codes and input the extension at the end.
The script extension is: .vbs
Example: Clear_Urls_and_History.vbs
5.] Hit the save button and execute the script.
Notes: If there is an error with the code, or you have done something wrong, please download the original VBScript.
http://www.mediafire.com/?hn1mz0fjrxb
Please remember: After the script execution, you’ll need to reboot your computer.
Copyrighted by Lair360.