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

[问题求助] VBS局域网文件拷贝问题

局域网文件拷贝问题

规律如下:当前目录下有很多文件夹、很多txt文件,txt文件内容包含有 文件夹名的字符
要求:1.将当前目录下所有的txt文件分别移到对应的文件夹中,保证文件夹里的文件内容中包含的文件夹名与本文件夹名一致
         2.将其剪切至\\192.168.1.200\SHARE

以下代码的问题是:第2步太慢
不知有没有高效一点的vbs代码
  1. @echo off
  2. :更新时间 8:30 2015/7/11
  3. for /d %%a in (*) do (for %%i in (*.TXT) do findstr %%a %%i &&move %%i %%a)
  4. net use \\192.168.1.200\SHARE
  5. ping 127.0.0.1 -n 2 >NUL
  6. for /d %%a in (*) do (xcopy /e /y /h /k /i %%a \\192.168.1.200\SHARE\%%a\ &&rd /s /q %%a)
  7. net use \\192.168.1.200\SHARE /delete
  8. RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
复制代码

回复 9# 328612167


    即使不行,你也可以用这种方法来加快速度,单个文件处理的速度是很慢的。

TOP

回复 8# 9zhmke


    那样是在目的地生成压缩包吗,
    如果是那样的话,就不行

TOP

不要使用单文件操作,直接使用WINRAR压缩到网络目的地吧,应该速度会快不少。

TOP

回复  WHY


   和我的代码所用的时间是一样的
批处理要等上一句执行完成后才执行下一句
328612167 发表于 2015-7-23 08:49



    你想多了,回复你只是为自己攒积分,我没兴趣解决你的问题

TOP

回复 5# WHY


   和我的代码所用的时间是一样的
批处理要等上一句执行完成后才执行下一句

TOP

  1. @echo off
  2. net use \\192.168.1.200\SHARE
  3. ping 127.0.0.1 -n 2 >NUL
  4. for /d %%a in (*) do (
  5.     for /f %%i in ('findstr /i /m %%a *.TXT') do move %%i %%a
  6.     xcopy /e /y /h /k /i %%a \\192.168.1.200\SHARE\%%a\ &&rd /s /q %%a
  7. )
  8. net use \\192.168.1.200\SHARE /delete
  9. RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
复制代码

TOP

回复 3# 328612167

手动复制整个文件夹到共享需多久?是1小时吗?
恭喜你了,你的BAT帮你提高了60倍的效率。
『千江有水千江月』千江有水,月映千江;万里无云,万里青天。    http://yu2n.qiniudn.com/

TOP

回复 2# Tianorder


我讲究效率

TOP

回复 1# 328612167


    有多慢?1分钟?
您好

TOP

返回列表