简介
哈喽,我又回来了,这次是2.0版本,主要对以前1.0版本的更新,主要更新内容:添加一个新的功能,和一个清理本地电脑上的企业微信和微信聊天记录,不过只能清理默认路径下的,和一个窗口动画效果
窗口动画
将以下代码添加到你的bat中 即可在运行时打开的CMD窗口会有一个 动画效果
:: 修改窗口标题与大小 关键代码
set "cols=30"
set "lines=3"
:resize_window
set /a cols+=4, lines+=4
mode con: cols=%cols% lines=%lines%
if %cols% lss 59 goto resize_window
清理聊天记录
这段代码主要是清理电脑上企业微信和微信的聊天记录 不过只能清理默认存储路径下的哈,
::清理微信/企业微信记录
:ClearWeCat
cls
DEL /s /q /a "%HOMEPATH%\Documents\WeChat Files\*.*"
RD /s /q "%HOMEPATH%\Documents\WeChat Files"
TIMEOUT /T 5
DEL /s /q /a %HOMEPATH%\Documents\WXWork\*.*
RD /s /q %HOMEPATH%\Documents\WXWork
echo 清理完毕 即将退出
exit
完整代码如下
@echo off
chcp 65001 >nul
:: 修改窗口标题与大小
set "cols=30"
set "lines=3"
:resize_window
set /a cols+=4, lines+=4
mode con: cols=%cols% lines=%lines%
if %cols% lss 59 goto resize_window
:: 延迟执行后面命令
ping 127.0.0.1 -n 1 >nul
title 远程桌面Pro
::星星管理号
set xhttp=43.*.*.107
::助手号1
set zsh1=43.*.*.188
::助手号2
set zsh2=43.*.*.250
::K群1---98 远程地址
set http0=106.*.*.223
::K群101---200 远程地址
set http1=43.*.*.105
::K群201---300 远程地址
set http2=134.*.*.124
::K群301---400 T群396---400 远程地址
set http3=123.*.*.117
::K群401---500 W群404---409 L群436---572 远程地址
set http4=43.*.*.246
::K群501---600 远程地址
set http5=81.*.*.9
::--------------------------
::K群601---700 远程地址
set http13=159.*.*3
::--------------------------
::F群001-100,201-202 远程地址
set http10=43.*.*216.85
::F群101-200 远程地址
set http6=43.*.*33.231
::F群203---302 远程地址
set http7=106.*.*165.78
::--------------------------
::D群001---102 远程地址
set http8=159.*.*.177
::--------------------------
::A群001---006 远程地址
set http9=43.*.*.15
::--------------------------
::M群001---009 远程地址
set http11=119.*.*.43
::--------------------------
::E群001 远程地址
set http12=114.*.*.87
::--------------------------
::Vip群001-002 远程地址
set httpvip=129.*.*.227
::--------------------------
::大罗远程地址
set httpDl=43.*.*.103
::--------------------------
::大威远程地址
set httpDw=43.*.*.27
::--------------------------
SETLOCAL EnableDelayedExpansion
for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (
set "DEL=%%a"
)
:start
cls
chcp 65001 >nul
call :ColorText 0b " ---------------------------------------------"
echo.
echo 远程桌面Pro
echo.
echo 4.0正式版^| 2024.4.7 ^| 华风夏韵
echo.
call :ColorText 0b " ---------------------------------------------"
echo.
echo.
echo 工具说明
echo.
echo 本工具已测试win10版本
echo.
echo 部分功能可能出现BUG,请谨慎使用
echo.
echo 可直接输入远程ip地址沃
echo.
echo 功能列表
echo.
echo 1,管理裙-助手号
echo.
echo 2,拉托号云端
echo.
echo 3,清理微信/企业微信记录
echo.
echo 4,退出
echo.
call :ColorText 0C "-------------------------------------------------------------"
echo.
::主页面
:isShuz
set input=
set /p input= 请输入:
::跳转群管理模块
if %input%== 1 goto QqunMode
::跳转监控号云端模块
if %input%== 2 goto SenLingMode
if %input%== 3 goto ClearWeCat
if %input%== 4 exit
:: 检测IP格式是否标准
echo %input%|findstr "^[0-9]*\.[0-9]*\.[0-9]*\.[0-9]*$">nul||goto fail
set _input=%input:.= %
call :check %_input%
:check
if "%4"=="" goto fail
for %%i in (%1 %2 %3 %4) do (
:: ip格式错误 二次判断群编
if %%i gtr 255 goto isShuz
)
::ip格式正确,直接连接
echo 远程连接中。。。
Start mstsc /v:%input%
exit
::清理微信/企业微信记录
:ClearWeCat
cls
DEL /s /q /a "%HOMEPATH%\Documents\WeChat Files\*.*"
RD /s /q "%HOMEPATH%\Documents\WeChat Files"
TIMEOUT /T 5
DEL /s /q /a %HOMEPATH%\Documents\WXWork\*.*
RD /s /q %HOMEPATH%\Documents\WXWork
echo 清理完毕 即将退出
exit
::拉托号云端模块
:SenLingMode
call :ColorText 0b "-------------------------------------------------------------"
echo.
echo.
echo 您正在使用拉托号云端功能 N 返回
echo.
echo 直接输入功能序号即可
echo.
echo 1,大罗
echo.
echo. 2,大威
echo.
set kk=
set /p kk=请选择:
if /i %kk% == 1 (
::大罗远程
echo 远程连接中。。。
Start mstsc /v:%httpDl%
exit
) else if /i %kk% == 2 (
::大威远程
echo 远程连接中。。。
Start mstsc /v:%httpDw%
exit
) else if /i %kk% == N (
::返回上一级
goto Start
) else (
echo 输入不合法,重新输入
goto SenLingMode
)
::群管理模块
:QqunMode
call :ColorText 0b "-------------------------------------------------------------"
echo.
echo.
echo 您正在使用群管理功能
echo.
echo 直接输入群编号即可 :k001
echo.
echo. Vip群-vipq ^| 星星群-xxgl ^| 助手号-zsh1,zsh2
echo.
set var=
set /p var= 请输入群编号:
if /i %var:~0,1% == A (
::A群001---006
echo 远程连接中。。。
Start mstsc /v:%http9%
exit
) else if /i %var:~0,1% == D (
::D群003---102
echo 远程连接中。。。
Start mstsc /v:%http8%
exit
) else if /i %var:~0,1% == M (
::M群001---009
echo 远程连接中。。。
Start mstsc /v:%http11%
exit
) else if /i %var:~0,1% == E (
::E群001
echo 远程连接中。。。
Start mstsc /v:%http12%
exit
) else if /i %var:~0,1% == F (
::F群001-100,201-202
if %var:~1,1%==0 (
echo 远程连接中。。。
Start mstsc /v:%http10%
exit
)
::F群101-200
if %var:~-3% geq 101 (
if %var:~-3% leq 200 (
echo 远程连接中。。。
Start mstsc /v:%http6%
exit
)
)
::F群203---302
if %var:~-3% geq 203 (
if %var:~-3% leq 302 (
echo 远程连接中。。。
Start mstsc /v:%http7%
exit
)
)
) else if /i %var:~0,1% == L (
::L群436---572
if %var:~-3% geq 436 (
if %var:~-3% leq 572 (
echo 远程连接中。。。
Start mstsc /v:%http4%
exit
)
)
) else if /i %var:~0,1% == W (
::W群404---409
if %var:~-3% geq 404 (
if %var:~-3% leq 409 (
echo 远程连接中。。。
Start mstsc /v:%http4%
exit
)
)
) else if /i %var:~0,1% == T (
::T群396---400
if %var:~-3% geq 396 (
if %var:~-3% leq 400 (
echo 远程连接中。。。
Start mstsc /v:%http3%
exit
)
)
) else if /i %var:~0,1% == V (
::Vip群001---002
echo 远程连接中。。。
Start mstsc /v:%httpv%
exit
) else if /i %var:~0,1% == X (
::星星管理员
echo 远程连接中。。。
if %var:~1,1% == x (
Start mstsc /v:%xhttp%
exit
)
exit
) else if /i %var:~0,1% == Z (
::助手号1--2
echo 远程连接中。。。
if %var:~3,1%==1 (
Start mstsc /v:%zsh1%
exit
)else if %var:~3,1%==2 (
Start mstsc /v:%zsh2%
exit
)
exit
) else if /i %var:~0,1% == K (
::K群001---98
if %var:~1,1%==0 (
echo 远程连接中。。。
Start mstsc /v:%http0%
exit
)
::K群101---200
if %var:~-3% geq 101 (
if %var:~-3% leq 200 (
echo 远程连接中。。。
Start mstsc /v:%http1%
exit
)
)
::K群201---300
if %var:~-3% geq 201 (
if %var:~-3% leq 300 (
echo 远程连接中。。。
Start mstsc /v:%http2%
exit
)
)
::K群301---400
if %var:~-3% geq 301 (
if %var:~-3% leq 400 (
echo 远程连接中。。。
Start mstsc /v:%http3%
exit
)
)
::K群401---500
if %var:~-3% geq 401 (
if %var:~-3% leq 500 (
echo 远程连接中。。。
Start mstsc /v:%http4%
exit
)
)
::K群501---600
if %var:~-3% geq 501 (
if %var:~-3% leq 600 (
echo 远程连接中。。。
Start mstsc /v:%http5%
exit
)
)
::K群601---700
if %var:~-3% geq 601 (
if %var:~-3% leq 700 (
echo 远程连接中。。。
Start mstsc /v:%http13%
exit
)
)
) else (
echo 输入错误!请重新输入
goto QqunMode
)
::文字变色输出
:ColorText
echo off
<nul set /p ".=%DEL%" > "%~2"
findstr /v /a:%1 /R "^$" "%~2" nul
del "%~2" > nul 2>&1
goto :eof
exit
以上就是这篇文章的全部内容了,由于我对批处理不是很熟,所以代码里有些是很重复的,如果有大佬看到ye可以评论一下,指出其中的不足沃,一起学习吧