Network Security Internet Technology Development Database Servers Mobile Phone Android Software Apple Software Computer Software News IT Information

In addition to Weibo, there is also WeChat

Please pay attention

WeChat public account

Shulou

Script sharing of hidden taskbar icons with vbscript

2025-04-02 Update From: SLTechnology News&Howtos shulou NAV: SLTechnology News&Howtos > Development >

Share

Shulou(Shulou.com)06/03 Report--

This article introduces the knowledge of "script sharing of hidden taskbar icons with vbscript". In the operation of actual cases, many people will encounter such a dilemma, so let the editor lead you to learn how to deal with these situations. I hope you can read it carefully and be able to achieve something!

Message = "To work correctly, the script will close" & vbCR Message = Message & "and restart the Windows Explorer shell." & vbCR Message = Message & "This will not harm your system." & vbCR & vbCR Message = Message & "Continue?" X = MsgBox (Message, vbYesNo, "Notice") If X = 6 Then On Error Resume Next Dim WSHShell, n, MyBox, p, t, errnum, vers Dim itemtype Dim enab, disab Jobfunc Set WSHShell = WScript.CreateObject ("WScript.Shell") p = "HKCU\ Software\ Microsoft\ Windows\ CurrentVersion\ Policies\ Explorer\ NoTrayItemsDisplay" itemtype = "REG_DWORD" enab = "ENABLED" disab = "DISABLED" jobfunc = "Notification Icons are now" t = "Confirmation" Err.Clear n = WSHShell.RegRead (p) errnum = Err.Number if errnum 0 then WSHShell.RegWrite p, 0 Itemtype End If If n = 0 Then n = 1 WSHShell.RegWrite p, n, itemtype Mybox = MsgBox (jobfunc & disab & vbCR, 4096, t) ElseIf n = 1 then n = 0 WSHShell.RegWrite p, n, itemtype Mybox = MsgBox (jobfunc & enab & vbCR, 4096, t) End If Set WshShell = Nothing On Error GoTo 0 For Each Process in GetObject ("winmgmts:"). _ ExecQuery ("select * from Win32_Process where name='explorer.exe'") Process.terminate (0) Next MsgBox "Finished." & vbcr & vbcr, 4096, "Done" Else MsgBox "No changes were made to your system." & vbcr & vbcr, 4096, "User Cancelled" End If "script sharing of hidden taskbar icons with vbscript" ends here. Thank you for reading. If you want to know more about the industry, you can follow the website, the editor will output more high-quality practical articles for you!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.

Views: 267

*The comments in the above article only represent the author's personal views and do not represent the views and positions of this website. If you have more insights, please feel free to contribute and share.

Share To

Development

Wechat

© 2024 shulou.com SLNews company. All rights reserved.

12
Report