Godmode (VBScript)

AddThis Social Bookmark Button

This script creates all of the GodMode shortcuts available in Windows 7 and 8.

This code should be saved to a text file that is renamed to 'Godmode.vbs'.

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("folders.txt", ForReading)
Const ForReading = 1
Dim arrFileLines()
i = 0
Do Until objFile.AtEndOfStream
Redim Preserve arrFileLines(i)
arrFileLines(i) = objFile.ReadLine
i = i + 1
Loop
objFile.Close

For Each strLine in arrFileLines
Set objFolder = objFSO.CreateFolder(strLine)
Next
wscript.quit

This code should be saved to a text file called 'folders.txt' in the same folder as the script above.

Microsoft.WindowsUpdate.{36eef7db-88ad-4e81-ad49-0e313f0c35f8}
Microsoft.WindowsSideShow.{E95A4861-D57A-4be1-AD0F-35267E261739}
Microsoft.MobilityCenter.{5ea4f148-308c-46d7-98a9-49041b1dd468}
Microsoft.WindowsFirewall.{4026492F-2F69-46B8-B9BF-5654FC07E423}
Microsoft.WindowsDefender.{D8559EB9-20C0-410E-BEDA-7ED416AECC2A}
Microsoft.CardSpace.{78CB147A-98EA-4AA6-B0DF-C8681F69341C}
Microsoft.WindowsAnytimeUpgrade.{BE122A0E-4503-11DA-8BDE-F66BAD1E3F3A}
Microsoft.UserAccounts.{60632754-c523-4b62-b45c-4172da012619}
Microsoft.Troubleshooting.{C58C4893-3BE0-4B45-ABB5-A63E4B8C8651}
Microsoft.TextToSpeech.{D17D1D6D-CC3F-4815-8FE3-607E7D5D10B3}
Microsoft.TaskbarAndStartMenu.{0DF44EAA-FF21-4412-828E-260A8728E7F1}
Microsoft.TabletPCSettings.{80F3F1D5-FECA-45F3-BC32-752C152E456E}
Microsoft.System.{BB06C0E4-D293-4f75-8A90-CB05B6477EEE}
Microsoft.SyncCenter.{9C73F5E5-7AE7-4E32-A8E8-8D23B85255BF}
Microsoft.SpeechRecognition.{58E3C745-D971-4081-9034-86E34B30836A}
Microsoft.Sound.{F2DDFC82-8F12-4CDD-B7DC-D4FE1425AA4D}
Microsoft.ScannersAndCameras.{00f2886f-cd64-4fc9-8ec5-30ef6cdbe8c3}
Microsoft.RemoteAppAndDesktopConnections.{241D7C96-F8BF-4F85-B01F-E2B043341A4B}
Microsoft.RegionAndLanguage.{62D8ED13-C9D0-4CE8-A914-47DD628FB1B0}
Microsoft.Recovery.{9FE63AFD-59CF-4419-9775-ABCC3849F861}
Microsoft.ProgramsAndFeatures.{7b81be6a-ce2b-4676-a29e-eb907a5126c5}
Microsoft.PowerOptions.{025A5937-A6BE-4686-A844-36FE4BEC8B6D}
Microsoft.PhoneAndModem.{40419485-C444-4567-851A-2DD7BFA1684D}
Microsoft.Personalization.{ED834ED6-4B5A-4bfe-8F11-A626DCB6A921}
Microsoft.PerformanceInformationAndTools.{78F3955E-3B90-4184-BD14-5397C15F1EFC}
Microsoft.PeopleNearMe.{5224F545-A443-4859-BA23-7B5A95BDC8EF}
Microsoft.PenAndTouch.{F82DF8F7-8B9F-442E-A48C-818EA735FF9B}
Microsoft.ParentalControls.{96AE8D84-A250-4520-95A5-A47A7E3C548B}
Microsoft.OfflineFiles.{D24F75AA-4F2B-4D07-A3C4-469B3D9030C4}
Microsoft.NotificationAreaIcons.{05d7b0f4-2121-4eff-bf6b-ed3f69b894d9}
Microsoft.NetworkAndSharingCenter.{8E908FC9-BECC-40f6-915B-F4CA0E70D03D}
Microsoft.Mouse.{6C8EEC18-8D75-41B2-A177-8831D59D2D50}
Microsoft.LocationAndOtherSensors.{E9950154-C418-419e-A90A-20C5287AE24B}
Microsoft.Keyboard.{725BE8F7-668E-4C7B-8F90-46BDB0936430}
Microsoft.iSCSIInitiator.{A304259D-52B8-4526-8B1A-A1D6CECC8243}
Microsoft.InternetOptions.{A3DD4F92-658A-410F-84FD-6FBBBEF2FFFE}
Microsoft.Infrared.{A0275511-0E86-4ECA-97C2-ECD8F1221D08}
Microsoft.IndexingOptions.{87D66A43-7B11-4A28-9811-C86EE395ACF7}
Microsoft.HomeGroup.{67CA7650-96E6-4FDD-BB43-A8E774F73A57}
Microsoft.GettingStarted.{CB1B7F8C-C50A-4176-B604-9E24DEE8D4D1}
Microsoft.GetPrograms.{15eae92e-f17a-4431-9f28-805e482dafd4}
Microsoft.GameControllers.{259EF4B1-E6C9-4176-B574-481532C9BCE8}
Microsoft.Fonts.{93412589-74D4-4E4E-AD0E-E0CB621440FD}
Microsoft.FolderOptions.{6DFD7C5C-2451-11d3-A299-00C04F8EF6AF}
Microsoft.EaseOfAccessCenter.{D555645E-D4F8-4c29-A827-D93C859C4F2A}
Microsoft.Display.{C555438B-3C23-4769-A71F-B6D3D9B6053A}
Microsoft.DevicesAndPrinters .{A8A91A66-3A7D-4424-8D24-04E180695C7A}
Microsoft.DeviceManager.{74246bfc-4c96-11d0-abef-0020af6b0b7a}
Microsoft.DesktopGadgets .{37efd44d-ef8d-41b1-940d-96973a50e9e0}
Microsoft.DefaultPrograms.{17cd9488-1228-4b2f-88ce-4298e93e0966}
Microsoft.DefaultLocation.{00C6D95F-329C-409a-81D7-C46C66EA7F33}
Microsoft.DateAndTime.{E2E7934B-DCE5-43C4-9576-7FE4F75E7480}
Microsoft.CredentialManager.{1206F5F1-0569-412C-8FEC-3204630DFB70}
Microsoft.ColorManagement.{B2C761C6-29BC-4f19-9251-E6195265BAF1}
Microsoft.BitLockerDriveEncryption.{D9EF8727-CAC2-4e60-809E-86F80A666C91}
Microsoft.BiometricDevices .{0142e4d0-fb7a-11dc-ba4a-000ffe7ab428}
Microsoft.BackupAndRestore.{B98A2BEA-7D42-4558-8BD1-832F41BAC6FD}
Microsoft.AutoPlay.{9C60DE1E-E5FC-40f4-A487-460851A8D915}
Microsoft.AdministrativeTools.{D20EA4E1-3957-11d2-A40B-0C5020524153}
Microsoft.ActionCenter.{BB64F8A7-BEE7-4E1A-AB8D-7D8273F7FDB6}
GodMode.{ED7BA470-8E54-465E-825C-99712043E01C}

To run the script simply double click the GodMode.vbs file.

Attachments:
Download this file (godmode.zip)godmode.zip2 kB2012-04-30