今天不知道点了什么东西,桌面上工具栏的图标突然由原来的排列挤到一起去了,图标变小了,而且异常难看,在网上找到了一段代码,运行过后变好了,真是神奇啊
将下面代码保存成vbs文件直接执行就可以了,希望可以帮到更多的人
Set WSHShell = WScript.CreateObject("WScript.Shell")
Message = "本脚本用于修复Windows XP中当最小化程序时,无法在任务栏显示图标的问题。"& vbCR & vbCR
Message = Message & "为了正常工作,本脚本将关闭和重启 Windows Explorer 外壳,这个操作不会损坏你的系统。" & vbCR & vbCR
Message = Message & "请关闭所有杀毒软件的实时监控!并保存所有打开的文件。"& vbCR & vbCR
Message = Message & "是否继续?"
X = MsgBox(Message, vbYesNo+vbExclamation, "注意")
If X = 6 Then
On Error Resume Next
WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2\"
WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\StreamsMRU\"
WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop\"
WshShell.RegDelete "HKCU\Software\Microsoft\Internet Explorer\Explorer Bars\{32683183-48a0-441b-a342-7c2a440a9478}\BarSize"
P1 = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
WshShell.RegWrite p1 & "NoBandCustomize", 0, "REG_DWORD"
WshShell.RegWrite p1 & "NoMovingBands", 0, "REG_DWORD"
WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"
WshShell.RegWrite p1 & "NoSetTaskbar", 0, "REG_DWORD"
WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"
WshShell.RegWrite p1 & "NoSaveSettings",0,"REG_DWORD"
WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"
WshShell.RegWrite p1 & "NoSetTaskbar",0,"REG_DWORD"
WshShell.RegWrite p1 & "NoActiveDesktop",0,"REG_DWORD"
WshShell.RegWrite p1 & "ClassicShell",0,"REG_DWORD"
WshShell.RegWrite p1 & "NoTrayItemsDisplay",0,"REG_DWORD"
p1 = "HKCU\Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\本地User\Software\Microsoft\Windows\CurrentVersion\Policies \Explorer\"
WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"
WshShell.RegDelete p1 & "NoMovingBands"
p1 = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell"
WshShell.RegWrite p1, "explorer.exe", "REG_SZ"
p1 = "HKCU\Software\Microsoft\Internet Explorer\Explorer Bars\{32683183-48a0-441b-a342-7c2a440a9478}\"
WshShell.RegDelete p1 & "BarSize"
WshShell.RegWrite p1, "媒体区", "REG_SZ"
On Error Goto 0
For Each Process in GetObject("winmgmts:"). _
ExecQuery ("select * from Win32_Process where name='explorer.exe'")
Process.terminate(0)
Next
MsgBox "完成!" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "完成"
Else
MsgBox "没有对你的系统进行任何改变。" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "用户取消了"
End If
分享到:
相关推荐
VB在任务栏显示隐藏程序,貌似在XP下运行不正常,测试时没看到效果,时间关系这里没有修改代码,保持原样,有兴趣的朋友可下载修正,再些提示:用 CTRL ALT DELETE 打开任务管理器,然后在应用程序中看上面按钮的...
业主擅自变更排水设施应恢复原状.docx
直刷版,简单快用,直接点击压缩包里面的EPFWUPD软件可以直接刷机,非常简单就可以刷机恢复原状 爱普生XP245固件升级 导致墨盒不识别。刷机降级修复。 解决墨盒不识别问题,解决清零问题,刷掉墨盒芯片,墨盒永远显示满...
双击本注册表文件,刷新后,即可使“文件夹选项”恢复原样,变成可使用状态。
1.需要创建个件/etc/resolvconf/resolv.conf.d/tail 2.在该件中写需要的dns服务器,格式与/etc/resolv.conf相
当你开启了guest账户却还是根本不能访问时,请检查设置是否为拒绝guest从网络访问计算机,因为XP默认是不允许guest从网络登录的,所以即使开了guest也一样不能访问。在开启了系统Guest用户的情况下解除对Guest账号...
DismissibleImageView 点击ImageView能够扩展至全屏,然后通过拉到屏幕边缘恢复原状
这个是专门修复一些人老不拔下电池通着交流电,以至电池在短时间内失效的,里面有使用说明
内容索引:VB源码,系统相关,任务栏 VB在任务栏显示隐藏程序,貌似在XP下运行不正常,测试时没看到效果,时间关系这里没有修改代码,保持原样,有兴趣的朋友可下载修正,再些提示:用 CTRL + ALT + DELETE 打开任务...
星语系统优化 XP本身在Windows XP下开发而来,很多朋友担心WIN2K、WIN2K3、VISTA、WIN7下无法使 用本软件,而你完全不用担心在其他系统使用中导致错误问题,星语系统优化 XP已经能够很顺利的在其 他系统中稳定的...
滑动到顶部悬浮功能条 __上滑停靠顶端悬浮框,下滑恢复原有位置.zip,太多无法一一验证是否可用,程序如果跑不起来需要自调,部分代码功能进行参考学习。
AndroidMaterialDesign工具栏 带有材料设计和工具栏的Android示例项目。 项目使用Appcompat库进行材料设计。 项目包含 *材料设计主题 *工具栏 *导航抽屉 *新的SlidingTabLayout * ViewPager *材料浮动动作按钮 *...
绿草是最有韧性的成分,在火灾后一年可以完全恢复,其次是在火灾后两年可以恢复原状,灌木和土壤有机硬皮需要四年以上的时间才能恢复。 大约四年后,生态系统恢复到未燃烧状态。 该结论与某些研究中最短的射击间隔...
Windows系统与Linux系的系统的一个显著区别就是:Windows系统可以仅仅通过鼠标点击就完成很多事情,而Linux往往需要命令行来操作。...同时,还提供了图标小箭头恢复的脚本,如果觉得不习惯也可以恢复成原样。
该脚本旨在保存和恢复 MATLAB 的工作状态。 这仅在 MATLAB 版本 R2007a 到 R2011a 上进行了测试,并且它使用了 MATLAB 的一些未记录的功能,可能无法在其他版本上正常工作。 当使用 'save' 标志调用此脚本时,它会...
有了他们,你会更方便…… 1 最小化所有窗口(显示桌面)/恢复原状 Win + D 2 打开运行对话框 Win + R ... 16 去除CSS样式 Alt + V + Y + N (或 CTRL + Shift + S + Web Developer’s 工具栏) 17 恢复CS ……
这是我用过的最好用的删除数据恢复软件,很多软件恢复数据后不能使用,但是这个软件最大限度的保持了数据的原状,特别是图片和视频文件。
Whatsapp自动化 Whatsapp实用程序可以自动执行操作。 法拉门塔斯 特里维奥(Twilio):API Para envio de mensagens :speech_balloon: Apscheduler:图书馆议程执行人时间间隔 :calendar: 实用程序API ...
colorfulWall 鼠标滑过黑色方块,随机改变方块的background-color,当鼠标离开方块后,恢复原状。
NetBeans 在工具栏插件上显示路径 特征 在工具栏上显示完整路径 将完整路径复制到剪贴板 使用关联的应用程序打开文件 常问问题 我想暂时隐藏这个工具栏。 请取消选中“ View > Toolbar > Show Path 我想把这个工具...