濮阳杆衣贸易有限公司

主頁(yè) > 知識(shí)庫(kù) > 用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本

用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本

熱門標(biāo)簽:外呼系統(tǒng)說(shuō)話聲音小怎么辦 上海辦理400電話選號(hào) 墨西哥地圖標(biāo)注app 龍巖400電話申請(qǐng) 機(jī)器人打電銷適用于美業(yè)嗎 企業(yè)400電話辦理價(jià)錢低 天津智能外呼系統(tǒng)排名 外呼系統(tǒng)群 智云億呼電話機(jī)器人
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

標(biāo)簽:錫林郭勒盟 齊齊哈爾 阜新 青島 鄂爾多斯 黃山 承德 麗水

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本》,本文關(guān)鍵詞  用,vbscript,實(shí)現(xiàn),隱藏,任務(wù)欄,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本》相關(guān)的同類信息!
  • 本頁(yè)收集關(guān)于用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    陆河县| 白城市| 桂平市| 分宜县| 靖边县| 沁水县| 宁波市| 明溪县| 肥西县| 普陀区| 长海县| 绥滨县| 邢台市| 赫章县| 瑞安市| 汝南县| 莱西市| 武鸣县| 宁国市| 碌曲县| 涟水县| 义马市| 富裕县| 虞城县| 海安县| 宜阳县| 皋兰县| 喀什市| 柏乡县| 黄大仙区| 巴彦淖尔市| 碌曲县| 始兴县| 青川县| 邵阳县| 泸溪县| 修武县| 武宁县| 晋江市| 柳州市| 天柱县|