none
如何将一组文件起成同一个文件名,然后分别放入不同的文件夹里? RRS feed

  • 问题

  • 例如:一组文件名分别为a_001,a_002,a_003...........a_100.doc.  
    将其批量处理后成为: c:\hwt\a.doc
    c:\ewrew\a.doc
    c:\ewrew\a.doc
    c:\uoiuorewqr\a.doc

    • 已编辑 austin_w 2016年9月21日 6:09
    2016年9月21日 6:07

全部回复

  • 1.先添加引用:Microsoft.VisualBasic,再加上using Microsoft.VisualBasic.Devices;
    2.就下面两行

                    Computer MyComputer = new Computer();
                    MyComputer.FileSystem.RenameFile(FileName, newFileName);

    其中FileName是你所要重命名的文件的全路径,newFileName仅仅是目标文件名。

    PS:方便期间,建议把文件拷贝到统一的文件夹里操作。用循环.


    ASP.NET Forum
    StackOverFlow
    FreeRice Donate
    Issues to report
    Free Tech Books Search and Download


    2016年9月21日 6:11
  • 用VBA 可以吗? 宏按钮也行, 怎么弄? 另外我不是只需要Rename 文件名,而是将每个RENAME过的文件(同一个名的)放入 不同的文件夹内。
    • 已编辑 austin_w 2016年9月21日 7:32
    2016年9月21日 7:32
  • 批處理:

    @echo off

    setlocal enabledelayedexpansion

    pushd "!CD!"

    cd /d "%1"

    for /f "tokens=*" %%d in ('type "!CD!\dirs.list"') do (
    set dst=%%d
    dir "!dst!" /ad/b 1> nul 2> nul
    if !errorlevel! equ 0 (
    set file=
    for /f "tokens=*" %%f in ('die "!CD!\*.txt" /a-d/b') do set file=%%f
    move "!file!" "!dst!\a"
    )
    )

    popd
    endlocal
    手機上敲的,有錯自己調。

    Folding@Home


    • 已编辑 repl 2016年9月22日 3:17
    2016年9月22日 3:16