windows 7 enterprise 32 bit WindowsVista - The mul

[yongkang2216]

Matter 1st option 2nd Resolution

[WindowsVista]The many selection is disabled


Issue
Sometimes, the assortment of various files and folders underneath Vista doesnot operate any longer. (a bug that hardly ever occurs). To solve this difficulty:
1st alternative Head to this page: Click Resolve Single Decide upon hyperlink to download the file FixSingleSelect.zip Conserve it on the desktop, then extract its contents. Shut all windows during the browser open, and do not right until the finish on the process. Make a double click on the file FixSingleSelect.vbs that's on the desktop. Confirm by clicking Okay.
Wait a minute, then validate the concept.
Restart your Pc and try out yet again.



If the download website link doesn't perform, you could make the file FixSingleSelect.vbs: Open the notepad. Copy within the subsequent code:


Option Explicit const HKCU = &H80000001 const FWF_SINGLESEL = &H00000040 dim objReg msgbox "Shut all Explorer windows before continuing." Set objReg=GetObject("winmgmts:impersonationLevel=impe rsonate!\\.\root\default:StdRegProv") FixBags FixDefaults msgbox "Done! Logoff and Logon before opening any Explorer windows." '================================================= ================================================== Sub FixBags const BagsPath = "Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags" dim iFFlags dim strBag, strShellPath,microsoft windows 7 x64 key, strFolderID,office 2010 Professional key, strKeyPath dim arrBags, arrFolderIDs objReg.EnumKey HKCU, BagsPath, arrBags For Each strBag in arrBags strShellPath = BagsPath & "\" & strBag & "\Shell" If RegKeyExists(strShellPath) Then If objReg.EnumKey(HKCU, strShellPath,microsoft office 2010 Standard activation, arrFolderIDs) = 0 Then If Not IsNull(arrFolderIDs) Then For each strFolderID in arrFolderIDs strKeyPath = strShellPath & "\" & strFolderID If objReg.GetDWORDValue(HKCU, strKeyPath,windows 7 enterprise 32 bit, "FFlags", iFFlags) = 0 Then If (iFFlags AND FWF_SINGLESEL) <> 0 Then iFFlags = (iFFlags AND (NOT(FWF_SINGLESEL))) If objReg.SetDWORDValue(HKCU, strKeyPath, "FFlags",microsoft office Professional Plus generator, iFFlags) <> 0 Then Msgbox "SetDWORDValue Failed" Conclude If Finish If Finish If Next Stop If End If Finish If Next Conclude Sub '================================================= ================================================== '================================================= ================================================== Sub FixDefaults const StreamsPath = "Software\Microsoft\Windows\CurrentVersion\Explore r\Streams\Defaults" dim bytTemp, bytFFlags dim iByteIndex dim strFolderID, strViewSettings, strSearch dim arrFolderIDs, arrRegTypes, arrViewSettings If (objReg.EnumValues(HKCU, StreamsPath, arrFolderIDs, arrRegTypes) <> 0) Or IsNull(arrFolderIDs) Then Exit Sub Finish If For Each strFolderID in arrFolderIDs If objReg.GetBinaryValue(HKCU, StreamsPath, strFolderID, arrViewSettings) = 0 Then '--- Convert Byte array to string to facilitate searching --- strViewSettings = "" For each bytTemp in arrViewSettings strViewSettings = strViewSettings & chr(bytTemp) Next strSearch = "F" & chr(0) & "F" & chr(0) & "l" & chr(0) & "a" & chr(0) & "g" & chr(0) & "s" iByteIndex = instr(strViewSettings, strSearch) + 17 bytFFlags = arrViewSettings(iByteIndex) If (bytFFlags AND FWF_SINGLESEL) <> 0 Then arrViewSettings(iByteIndex) = (bytFFlags AND NOT(FWF_SINGLESEL)) If objReg.SetBinaryValue(HKCU, StreamsPath, strFolderID, arrViewSettings) <> 0 Then msgbox "SetBinaryValue Failed" End If Finish If Conclude If Next Finish Sub '================================================= ================================================== Function RegKeyExists(sRegKey) dim aValueNames, aValueTypes sRegKey = Trim(sRegKey) If objReg.EnumValues(HKCU, sRegKey, aValueNames, aValueTypes) = 0 Then RegKeyExists = True Else RegKeyExists = False Conclude If Finish Function Preserve the file by giving it the name FixSingleSelect.vbs Find All files of this type.
2nd Remedy Go to Control Panel> Folder Options (Classic View). Choose the View tab and click Reset Folders. Click on Yes and then press the Ok button.

This document entitled &laquo; WindowsVista - The a number of selection is disabled &raquo; from Kioskea (en.kioskea.net) is made available under the Creative Commons license. You'll be able to copy, modify copies of this page, under the conditions stipulated by the licence, as this note appears clearly.