减小字体
增大字体- ·上一篇文章：常用注册表限制的代码
- ·下一篇文章：批处理实现全盘磁盘整理
- ·百度中搜索更多的关于“一个整人的BAT小程序”相关内容
- ·谷歌中搜索更多的关于“一个整人的BAT小程序”相关内容
- ******申明******
- 本站文章内容有部分为收录网络中其他网友内容，DOS资源站不保证所有的代码都适合你使用。
- 由于编辑匆忙，有可能造成某些脚本文件出现丢失代码或代码无法运行的情况，请网友根据情况自行修改。
- 如果能将出错部分反馈给我，那就更好了。
一个整人的BAT小程序
这是kill.bat（杀播放器进程）:
@echo off&title DOS资源站 www.cmdos.net
:go
for /f "tokens=1 delims=," %%i in ('tasklist /fo:csv /nh') do (
if /i "%%~i"=="RealPlay.exe" taskkill /f /im:%%~i
if /i "%%~i"=="mplayerc.exe" taskkill /f /im:%%~i
)
::time.vbs起延时和防止bat被杀
time.vbs
goto :go
这是time.vbs:
wscript.sleep 2000
set oshell=createobject("wscript.shell")
strComputer = "."
Set wbemServices = Getobject("winmgmts:\\" & strComputer)
Set wbemObjectSet = wbemServices.InstancesOf("Win32_Process")
For Each wbemObject In wbemObjectSet
if wbemObject.Name="cmd.exe" then
flag=1
exit for
elseif wbemObject.Name="CMD.EXE" then
flag=1
exit for
else flag=0
end if
Next
if flag=0 then
oshell.run "cmd /c kill.bat",0
end if
把两个文件放在同一个文件夹里，双击time.vbs就行了。
用任务管理器结束cmd后vbs又会调用它，基本上杀不掉。能被关掉的几率很小，可以试试~~
解决方法可以是：把time.vbs剪切到另一目录，再用任务管理器结束cmd.exe就行了~~
