欢迎到
怎么恢复win7硬盘图标容量显示到图示，请看下面的代码：const HKEY_CURRENT_USER = &H80000001
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
("selec * from Win32_Process Where Name = 'explorer.exe'")
For Each objProcess in colProcessList
objProcess.Terminate()
Next
Set objRegistry=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_
strComputer & "\root\default:StdRegProv")
strKeyPath1 = "Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags"
strKeyPath2 = "Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\BagMRU"
strKeyPath3 = "SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Streams\Defaults"
DeleteSubkeys HKEY_CURRENT_USER, strKeypath1
DeleteSubkeys HKEY_CURRENT_USER, strKeypath2
DeleteSubkeys HKEY_CURRENT_USER, strKeypath3
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
将上面的复制到记事本 后缀名保存为vbs 运行即可。
然后打开“我的电脑”--“平铺”显示即可。 这是找回平铺的方法，下面我提供直接的运行代码下载，请注意关闭杀毒软件的误报或添加到“白名单”。
恢复取消win7文件夹图标自动排列.rar