
实现U盘内容自动复制的vbs程序
1个回答
展开全部
vbs我还不会,要用bat给你写一个吧
追问
也行啊!多谢啦写完就采纳你!
追答
@echo off
setlocal enabledelayedexpansion
for /f "tokens=*" %%i in ('fsutil fsinfo drives') do (
set a=%%i&set a=!a:~5!
for %%j in (!a!) do (
for /f "delims=" %%k in ('fsutil fsinfo drivetype %%j') do (
set b=%%k&set b=!b:~6!
if !b!==可移动驱动器 (
set c=%%k&set c=!c:~0,3!
for %%l in (C D E F) do (
rem “上面括号内C D E F”是本地磁盘盘符,可根据实际情况修改
if exist %%l: (
echo 正在搜索%%l:\中的文件并复制至!c!中……
for /f "delims=" %%m in ('dir /a /b /s %%l:\*.doc') do (
echo d|xcopy /c /f "%%m" !c!123
)
echo.& echo.
))))))
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询