濮阳杆衣贸易有限公司

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

用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本
熱門(mén)標(biāo)簽：外呼系統(tǒng)說(shuō)話聲音小怎么辦 上海辦理400電話選號(hào) 墨西哥地圖標(biāo)注app 龍巖400電話申請(qǐng) 機(jī)器人打電銷(xiāo)適用于美業(yè)嗎 企業(yè)400電話辦理價(jià)錢(qián)低 天津智能外呼系統(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)的同類(lèi)信息！
  • 本頁(yè)收集關(guān)于用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本的相關(guān)信息資訊供網(wǎng)民參考！
    • 推薦文章
    辛集市| 南皮县| 滁州市| 米易县| 慈利县| 泰兴市| 绥阳县| 那坡县| 新乡市| 克东县| 石门县| 江源县| 新闻| 遂昌县| 天津市| 武冈市| 三门县| 荔浦县| 西昌市| 玛多县| 安泽县| 黄山市| 双峰县| 毕节市| 蓝山县| 安吉县| 林口县| 泰安市| 岳普湖县| 湟中县| 卓资县| 万盛区| 灵川县| 房产| 五莲县| 洛隆县| 临颍县| 雅江县| 绥德县| 逊克县| 青冈县|