-
win10文件夹怎么自由排序?(6)
- 作者:田火劭 分类:win10 发布时间:2022-04-29 17:00:00
3、双击创建好的“Win7自由排列.reg”导入注册表中; 4、导入后重新启动一下win7系统,这时你发现文件和文件夹已经能自由排列了,不过有的用户出现了一...
3、双击创建好的“Win7自由排列.reg”导入注册表中;
4、导入后重新启动一下win7系统,这时你发现文件和文件夹已经能自由排列了,不过有的用户出现了一些问题,”平铺视图“不见了,那么我们还要解决一下这个问题,复制下面的代码到记事本中;
const HKEY_CURRENT_USER = &H80000001
strComputer = “。”
Set objWMIService = GetObject(“winmgmts:” _
& “{impersonationLevel=impersonate}!” & strComputer & “rootcimv2”)
Set colProcessList = objWMIService.ExecQuery _
(“Select * from Win32_Process Where Name = ‘explorer.exe’”)
For Each objProcess in colProcessList
objProcess.Terminate()
Next
Set objRegistry=GetObject(“winmgmts:{impersonationLevel=impersonate}!” &_
strComputer & “rootdefault:StdRegProv”)
strKeyPath1 = “SoftwareClassesLocal SettingsSoftwareMicrosoftWindowsShellBags”
strKeyPath2 = “SoftwareClassesLocal SettingsSoftwareMicrosoftWindowsShellBagMRU”
strKeyPath3 = “SOFTWAREMicrosoftWindowsCurrentVersionExplorerStreamsDefaults”
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
5、另存为 “修复平铺视图.vbs” 注意这次是.vbs而不是reg文件,其实是一个脚本文件。
猜您喜欢
- 揭秘:Win10密码更改步骤,轻松告别开..2024-05-06
- Win10电脑被限制访问?教你一招轻松解..2024-05-06
- Win10家庭版HDR按钮不显示?一招解决,..2024-05-06
- 掌握Win10安装系统分区新技能,让你告..2024-05-06
- Win10更改用户名提示文件夹正在使用?..2024-05-06
- Win10安全模式秘籍:按F几轻松进入,让..2024-05-06
相关推荐
- win10系统page fault in nonpaged area dxgkrnl...2021-04-13
- 电脑可以安装微信吗?Win10系统安装微..2021-06-17
- win10qq登陆超时检查网络或防火墙怎么..2023-10-12
- win10获取焦点鼠标消失怎么解决_win10鼠..2021-01-23
- 你的设备危机:重启自救大作战?快速..2024-01-31
- win10自带游戏怎么打开 win10自带游戏怎..2022-02-24