【已解决】如何制作一个自动处理微信后台保存过的所有文件和图片和缓存

朱科技 · 发表于 2022-12-4 19:53:37

本帖最后由朱科技于 2022-12-28 10:36 编辑

怎么写代码呢

Batcher · 发表于 2022-12-4 19:55:10

回复 1# 朱科技

请说说具体怎么处理

朱科技 · 发表于 2022-12-4 21:33:18

回复 2# Batcher

删除处理

77七 · 发表于 2022-12-4 22:13:25

找到各自的文件夹，写个删除命令就行了

ygqiang · 发表于 2022-12-5 05:43:59

回复 1# 朱科技

@echo off
title deldel
ping 0 -n 1 >nul 2>nul
if "%1" == "h" goto begin
mshta vbscript:createobject^("wscript.shell"^).run^("%~fs0 h %1",0^)^(window.close^)&&exit
:begin
rem 下边开始写批处代码了
echo 删除不确定目录名下-固定路径-固定某个目录下的所有文件和文件夹
echo 比如c:\Users\用户名\AppData\Roaming\kingsoft\office6\backup，其中用户名有很多，不确定具体名称
----------------------------------------------------
cls
set "filesname=FileStorage\Cache"
::指定文件夹后缀
set "dird=%userprofile%\Documents\WeChat Files"
::指定文件夹前缀
for /f "delims=" %%a in ('dir /ad /b "%dird%"') do (
if exist "%dird%\%%a\%filesname%" (
1start "" "%dird%\%%a\%filesname%"
1pause
del /s /f /q "%dird%\%%a\%filesname%\*.*" 2>nul & cls
)
if exist "%dird%\%%a\%filesname%" (
for /f "delims=" %%b in ('dir /ad /b /s "%dird%\%%a\%filesname%"^|sort /r') do (rd "%%b" /s /q & cls)
)
)
----------------------------------------------------
cls
set "filesname=FileStorage\Image"
::指定文件夹后缀
set "dird=%userprofile%\Documents\WeChat Files"
::指定文件夹前缀
for /f "delims=" %%a in ('dir /ad /b "%dird%"') do (
if exist "%dird%\%%a\%filesname%" (
1start "" "%dird%\%%a\%filesname%"
1pause
del /s /f /q "%dird%\%%a\%filesname%\*.*" 2>nul & cls
)
if exist "%dird%\%%a\%filesname%" (
for /f "delims=" %%b in ('dir /ad /b /s "%dird%\%%a\%filesname%"^|sort /r') do (rd "%%b" /s /q & cls)
)
)
----------------------------------------------------
cls
set "filesname=FileStorage\Video"
::指定文件夹后缀
set "dird=%userprofile%\Documents\WeChat Files"
::指定文件夹前缀
for /f "delims=" %%a in ('dir /ad /b "%dird%"') do (
if exist "%dird%\%%a\%filesname%" (
1start "" "%dird%\%%a\%filesname%"
1pause
del /s /f /q "%dird%\%%a\%filesname%\*.*" 2>nul & cls
)
if exist "%dird%\%%a\%filesname%" (
for /f "delims=" %%b in ('dir /ad /b /s "%dird%\%%a\%filesname%"^|sort /r') do (rd "%%b" /s /q & cls)
)
)
--------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------
cls
set "dird=%userprofile%\Documents"
::指定文件夹
if exist "%dird%" (
1start "" "%dird%"
1pause
del /s /f /q "%dird%\*.*" 2>nul & cls
for /f "delims=" %%a in ('dir /ad /b "%dird%"') do (
for /f "delims=" %%b in ('dir /ad /b /s "%dird%"^|sort /r') do (rd "%%b" /s /q & cls)
)
)
--------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------
cls
set "dird=C:\Users\Public\Documents"
::指定文件夹
if exist "%dird%" (
1start "" "%dird%"
1pause
del /s /f /q "%dird%\*.*" 2>nul & cls
for /f "delims=" %%a in ('dir /ad /b "%dird%"') do (
for /f "delims=" %%b in ('dir /ad /b /s "%dird%"^|sort /r') do (rd "%%b" /s /q & cls)
)
)
--------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------
cls
set "dird=%userprofile%\AppData\Roaming\Tencent"
::指定文件夹
if exist "%dird%" (
1start "" "%dird%"
1pause
del /s /f /q "%dird%\*.*" 2>nul & cls
for /f "delims=" %%a in ('dir /ad /b "%dird%"') do (
for /f "delims=" %%b in ('dir /ad /b /s "%dird%"^|sort /r') do (rd "%%b" /s /q & cls)
)
)
exit

复制代码

Batcher · 发表于 2022-12-5 09:37:30

回复 3# 朱科技

批处理升级版清理微信电脑版的图片和视频文件
https://mp.weixin.qq.com/s/tl-tUaZ86RAbl51gh1Naog

批处理清理微信电脑版的图片和视频文件
https://mp.weixin.qq.com/s/cTXBsoJp3-3sxrZfvkMaDg

试试能否成功

朱科技 · 发表于 2022-12-5 20:07:39

回复 5# ygqiang

这么长命令啊，辛苦了

朱科技 · 发表于 2022-12-5 20:08:06

回复 6# Batcher

我看了下，眼睛都花了

ygqiang · 发表于 2022-12-28 10:54:35

本帖最后由 ygqiang 于 2022-12-28 11:17 编辑

回复 8# 朱科技

@echo off
REM 通过注册表获取微信缓存路径
for /f "tokens=2*" %%i in ('reg query "HKEY_CURRENT_USER\Software\Tencent\WeChat" /v FileSavePath') do (
set "MyPath=%%j"
)
if /i "%MyPath%" equ "MyDocument:" (
set "WeChatFolder=%userprofile%\Documents"
) else (
set "WeChatFolder=%MyPath:~0,-1%"
)
if not exist "%WeChatFolder%" (
goto :eof
)
echo —我的文档—：%WeChatFolder%
1pause
cls
REM 清理 Image 文件夹
for /f "delims=" %%i in ('dir /b /s /ad "%WeChatFolder%\WeChat Files" ^| findstr "\\FileStorage\\Image$"') do (
pushd "%%i"
echo 正在处理文件夹 "%%i"
for /d %%j in (*) do (
rd /s /q "%%j"
)
popd
)
REM 清理 Video 文件夹
for /f "delims=" %%i in ('dir /b /s /ad "%WeChatFolder%\WeChat Files" ^| findstr "\\FileStorage\\Video$"') do (
pushd "%%i"
echo 正在处理文件夹 "%%i"
for /d %%j in (*) do (
rd /s /q "%%j"
)
popd
)
cls
echo %WeChatFolder%\WeChat Files
1pause
rd /s /q "%WeChatFolder%\WeChat Files"
1pause
cls
echo 清空 —我的文档— （%WeChatFolder%）
1pause
if exist "%WeChatFolder%" (
1start "" "%WeChatFolder%"
1pause
del /s /f /q "%WeChatFolder%\*.*" 2>nul & cls
for /f "delims=" %%a in ('dir /ad /b "%WeChatFolder%"') do (
for /f "delims=" %%b in ('dir /ad /b /s "%WeChatFolder%"^|sort /r') do (rd "%%b" /s /q & cls)
)
)
exit

复制代码

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文件操作] 【已解决】如何制作一个自动处理微信后台保存过的所有文件和图片和缓存

评分

评分