电脑爱好者俱乐部-电脑粉丝联盟-电脑联盟(粉丝)论坛-福州联合采购贸易有限公司协办

 找回密码
 立即注册
http://www.i3sh.net/public/attachment/201807/03/20/5b3b67cc8c260_330
品牌名称:DM 产品参数: 品牌: DM 型号: PD086-32G 套餐类型: 官方标
纪河电脑店实体店消
商城购买链接:http://www.i3sh.net/youhui/ydetail/id-94 https://img.alicdn.com/tps/TB1y
效能倍增“利”器 移动互联网时代核心要素是规模和流量,谁的规模大谁占用的流量比例入口就大,一
本贴是论坛每日签到系统在每天的第一位签到
2月16日,《求是》杂志发表习近平总书记重要文章——《加强党对全面依法治国的领导
  电脑爱好者俱乐部成立于2002年7
五招让店铺起死回生 各位阿里商友好!
https://www.vjshi.com/ 影像视觉,VJ师网更懂您 VJ师
最新版本下载地址(更新版本会使用同样的下载地址)
Microsoft Office 2010 下载地址:http://downloads.988pc.com
NameSizeLast modified 4078_方正
■ 特点: 1、系统采用简体中文(32位/64位)MSDN官方发布原版镜像制作并完美激
https://wenku.baidu.com/view/0b22b70810661ed9ad51f34e.html
无法彻底卸载  如果通过简单的卸载程序进行卸载是无法
打开前盖。 按住确认键(会提示更换硒鼓 然后按开
惠普HP打印机提示No Print Cartridge、HP No Print Cartridge、惠普打印机故障,在日常办公的打印机
word2013打不开doc提示已被另一用户锁定该怎么办?打开.doc文档的时候,出现打不开的状况,总是提
什么是系统备份
什么时候需要还原分区与卷
由于最新win10系统的发布,新推出的联想笔记本电脑大都预装了win10系统
dell inspiron 15 7000 改win7 修改BIOS方法 按照图上所标注数字顺序修改 就可以改装了 按照 123456 顺
论坛搬家后,如何把以前转移出去的远程附件中的 文件放到现在的VPS上(就是现在的论坛取消
显示动态磁盘无效的情况 磁盘上保存
在微软的Windows 2000/XP/2003/2008/Vista和Windows 7上都可以很轻松地将一个基本磁盘转换
“移动便携”全新定义 防护型平板电脑都给人以笨重粗狂的感觉,今天全新磐石T60EX加固
Epson PLQ-20K在安装后不能打印或,只有首位只打印两字字符的解决方法
纪河电脑买电脑在本实体店现场下单比天猫旗舰店还优惠2% 河电脑比淘宝更低的价格 实体店看得见的服务 纪
11919
“移动便携”全新定义 防护型平板电脑都给人以笨重粗狂的感觉,今天全新磐石T60EX加固式防爆平板电脑带给我
返璞归真,面向未来 管线的日常检修工作是管道运输领域的难点。巡线工作需要对自然环
本安型防爆 工作更无忧 工业级加固设计的T70HEX防爆平板电脑为石油、
电脑配置清单 客户姓名:闽侯县上街镇厚美村联系方式:139607431922017年04月22日 名称型号单价质
宁美国度四核i5 7500/GTX1050Ti独显台式电脑主机DIY游戏组装整机+宁美国度 AOC I2479VXHD 23.8英寸高清屏幕护眼液晶电脑显示器27
1166211663 11664 11665
电脑配置清单 客户姓名:厚美客户联系方式:1396
查看: 10|回复: 0

XP系统删除多余任务栏,修复任务栏的方法

[复制链接] [提交至百度]

1149

主题

1335

帖子

5769

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
5769
发表于 2019-4-8 18:05:33 | 显示全部楼层 |阅读模式
  XP系统,在任务栏出现怪事,一般地我们的任务栏都是分为三部分,左边为快速启动,右
  边为语言栏,中间为已打文件夹或IE的任务栏,但我这里的中间部分被为两部分,都是显示已打文件夹或IE的任务栏,比喻你打开我的电脑,下面就出现两个我的电脑,如果你关闭,下面就两个都没有
  还有就是我在任务栏上右键---工具栏----新建工具栏之后任务栏就又多了一部分了,这一部分也不知如何删除?

解决方法如下:

'请把下面内容复制到新建立的记事本,并存文件名称为"任务栏修复.vbs",运行"任务栏修复.vbs"尝试修复,OK.

  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

  1. Set WSHShell = WScript.CreateObject("WScript.Shell")
  2. Message = "本脚本用于修复Windows XP中当最小化程序时,无法在任务栏显示图标的问题。"& vbCR & vbCR
  3. Message = Message & "为了正常工作,本脚本将关闭和重启 Windows Explorer 外壳,这个操作不会损坏你的系统。" & vbCR & vbCR
  4. Message = Message & "请关闭所有杀毒软件的实时监控!并保存所有打开的文件。"& vbCR & vbCR
  5. Message = Message & "是否继续?"

  6. X = MsgBox(Message, vbYesNo+vbExclamation, "注意")

  7. If X = 6 Then

  8. On Error Resume Next

  9. WshShell.RegDelete "HKCU/Software/Microsoft/Windows/CurrentVersion/Explorer/StuckRects2/"
  10. WshShell.RegDelete "HKCU/Software/Microsoft/Windows/CurrentVersion/Explorer/StreamsMRU/"
  11. WshShell.RegDelete "HKCU/Software/Microsoft/Windows/CurrentVersion/Explorer/Streams/Desktop/"

  12. WshShell.RegDelete "HKCU/Software/Microsoft/Internet Explorer/Explorer Bars/{32683183-48a0-441b-a342-7c2a440a9478}/BarSize"

  13. P1 = "HKCU/Software/Microsoft/Windows/CurrentVersion/Policies/Explorer/"

  14. WshShell.RegWrite p1 & "NoBandCustomize", 0, "REG_DWORD"
  15. WshShell.RegWrite p1 & "NoMovingBands", 0, "REG_DWORD"
  16. WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"
  17. WshShell.RegWrite p1 & "NoSetTaskbar", 0, "REG_DWORD"
  18. WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"
  19. WshShell.RegWrite p1 & "NoSaveSettings",0,"REG_DWORD"
  20. WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"
  21. WshShell.RegWrite p1 & "NoSetTaskbar",0,"REG_DWORD"
  22. WshShell.RegWrite p1 & "NoActiveDesktop",0,"REG_DWORD"
  23. WshShell.RegWrite p1 & "ClassicShell",0,"REG_DWORD"
  24. WshShell.RegWrite p1 & "NoTrayItemsDisplay",0,"REG_DWORD"

  25. p1 = "HKCU/Software/Microsoft/Windows/CurrentVersion/Group Policy Objects/本地User/Software/Microsoft/Windows/CurrentVersion/Policies/Explorer/"

  26. WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"
  27. WshShell.RegDelete p1 & "NoMovingBands"

  28. p1 = "HKLM/Software/Microsoft/Windows NT/CurrentVersion/Winlogon/Shell"

  29. WshShell.RegWrite p1, "explorer.exe", "REG_SZ"

  30. p1 = "HKCU/Software/Microsoft/Internet Explorer/Explorer Bars/{32683183-48a0-441b-a342-7c2a440a9478}/"
  31. WshShell.RegDelete p1 & "BarSize"
  32. WshShell.RegWrite p1, "媒体区", "REG_SZ"

  33. On Error Goto 0

  34. For Each Process in GetObject("winmgmts:"). _
  35. ExecQuery ("select * from Win32_Process where name='explorer.exe'")
  36.   Process.terminate(0)
  37. Next

  38. MsgBox "完成!" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "完成"

  39. Else

  40. MsgBox "没有对你的系统进行任何改变。" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "用户取消了"

  41. End If
复制代码

任务栏修复.vbs (2.48 KB, 下载次数: 0)
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|小黑屋|电脑联盟(粉丝)论坛 ( 闽ICP备13013206号 )分享按钮

在线客服

GMT+8, 2019-4-23 17:56 , Processed in 0.023687 second(s), 49 queries , Memcache On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表