重建图标缓存 打开空白记事本,把以下命令复制到空白记事本内,如下所示 On Error Resume Next If MsgBox("将关闭所有打开的资源管理器窗口,并重建图标缓存。" _& vbCrLf & "是否继续?",vbYesNo+vbQuestion,"询问")= vbNo Then Wscript.Quit End If Set FSO = CreateObject("Scripting.FileSystemObject") FSO.DeleteFile(FSO.GetSpecialFolder(0) & "\shelliconcache") Set FSO = Nothing Set Pros = GetObject("winmgmts:\\.\root\cimv2").ExecQuery ("Select * from Win32_Process Where Name = 'explorer.exe'") For Each Pro in Pros Pro.Terminate Next Set Pros = Nothing MsgBox "操作已完成。",vbInformation,"提示" 保存为.vbs