0

我有一大堆纯文本文件，命名如下：file1.txt，file2.txt，...，file14.txt，...我想将它们按正确顺序连接到一个 .txt 文件。我应该如何以编程方式执行此操作？在命令窗口中运行的批处理文件？或者编写一个 Windows 控制台应用程序？

无论哪种方式，我可以有代码吗？谢谢。

更多信息：

  • 大量文件。每次我做这个报告时，一百个或更多。

  • dir 不会以正确的顺序给出文件：例如 file10.txt 出现在 file2.txt 之前，这就是我强调的原因。似乎从 1 到 n 的 for i 连接到文件名前缀是最好的。但我不知道如何在批处理模式下执行此操作或从 Windows 程序执行命令。

我倾向于做一个 Windows 控制台应用程序。这样的事情会起作用吗？

class Program
{
    static void Main(string[] args)
    {
        string strCmdLine;
        System.Diagnostics.Process process1;
        process1 = new System.Diagnostics.Process();


        Int16 n = Convert.ToInt16(args[1]);
        int i;
        for (i = 1; i < n; i++)
        {
            strCmdLine = "/C copy more work here " + args[0] + i.ToString();
            System.Diagnostics.Process.Start("CMD.exe", strCmdLine);
            process1.Close();
        }


    }
}
4

7 回答 7

2

不是最有效的代码，但您应该能够理解：

        Dim files As String()
    Dim tempFile As String
    Dim orderedFiles As New Dictionary(Of Int32, String)
    Dim fileNumber As Int32
    Dim filePos As Int32
    Dim dotTxtPos As Int32
    Dim fileData As String
    Const CONST_DEST_FILE As String = "c:\tempfiles\destination.txt"

    files = System.IO.Directory.GetFiles("c:\tempfiles", "file*.txt")

    For Each tempFile In files
        If tempFile.ToLower.Contains("\file") = False Or tempFile.ToLower.Contains(".txt") = False Then
            Continue For
        End If

        filePos = tempFile.ToLower.IndexOf("\file") + 5
        dotTxtPos = tempFile.ToLower.IndexOf(".txt", filePos)
        If Int32.TryParse(tempFile.ToLower.Substring(filePos, dotTxtPos - filePos), fileNumber) = True Then
            orderedFiles.Add(fileNumber, tempFile)
        End If
    Next

    If System.IO.File.Exists(CONST_DEST_FILE) = True Then
        System.IO.File.Delete(CONST_DEST_FILE)
    End If

    fileNumber = 0
    Do While orderedFiles.Count > 0
        fileNumber += 1
        If orderedFiles.ContainsKey(fileNumber) = True Then
            tempFile = orderedFiles(fileNumber)
            fileData = System.IO.File.ReadAllText(tempFile)
            System.IO.File.AppendAllText(CONST_DEST_FILE, fileData)
            orderedFiles.Remove(fileNumber)
        End If
    Loop
于 2011-07-23T05:39:25.437 回答
2

如果您在 Windows 上，请安装 cygwin，这样您就可以拥有一个 bash shell，然后：

对于 {1..N} 中的 i ；做 cat ${1}.txt >> all.txt ; 完毕

其中 N 是您拥有的文件数，这些文件将全部连接在 all.txt

于 2011-09-02T05:13:07.463 回答
1

你有几种可能性。如果您dir在命令行执行 a ，并且它们按照您想要的顺序显示，那么事情就很简单了——您可以执行以下操作：

copy file*.txt destination.txt

这将产生一些轻微的副作用——它会在第一次control-Z遇到任何给定文件时停止读取，并将 a 附加control-Z到文件的末尾。如果您不希望这些发生，您可以添加/b：

copy /b file*.txt destination.txt

如果“目录”顺序不是您想要的顺序，那么您可以执行以下操作：

for %c in (a.txt b.txt c.txt) copy destination.txt+%c

其中a.txt, b.txt, c.txt(etc.) 是您要复制的文件，按您要复制的顺序列出（而且，很明显，destination.txt是您要为将它们放在一起的结果的名称。或者，您可以在一个命令行中将它们全部列出，例如copy a.txt+b.txt+c.txt destination.txt.

于 2011-07-23T05:10:02.720 回答
1

这可以使用以下 Windows PowerShell 一行来完成（为了便于阅读，这里分布四行）：

Get-ChildItem -Filter "*.txt" | 
    Sort-Object { [regex]::Replace($_, '\d+', { $args[0].Value.PadLeft(20) }) } | 
    gc | 
    sc result.txt

Get-ChildItem检索文件名，但它们的顺序错误（按 ASCII 顺序而不是字母顺序排序）。

该Sort-Objectcmdlet 用于按照您的指定对文件名进行排序，方法是在比较文件名之前填充文件名中的数字。

gc是 的别名Get-Content，它读取所有输入文件的内容。

sc是 的别名Set-Content，它将结果写入指定的文件。

这是使用 C# 的另一种方法，以防您不能/不会使用 PowerShell：

static class Program
{
    [DllImport("shlwapi.dll", CharSet = CharSet.Unicode)]
    static extern int StrCmpLogicalW(string s1, string s2);

    static void Main()
    {
        string[] files = Directory.GetFiles(@"C:\Path\To\Files", "*.txt");
        Array.Sort(files, StrCmpLogicalW);
        File.WriteAllLines("result.txt", files.SelectMany(file => File.ReadLines(file)));
    }
}

这使用该StrCmpLogicalW函数以正确的顺序获取文件名（该函数实际上是 Windows Explorer 用于对文件名进行排序的函数）。

于 2011-07-23T06:05:06.430 回答
1

如果您愿意投入最少的时间，这应该会很有效。对于一个完全自动化的过程，您需要计算出文件的数量（这并不难，但我从这里省略了）。但是对于仅 20 份报告，这可能会很好。

此外，批处理文件中的过程不是最佳的。事实上，这很可怕。我认为它是O（  n  ！）。使用批处理文件下面的版本可能要好得多。

作为批处理文件：

@echo off
if not "%~1"=="" goto begin
echo Usage: %~n1 ^<N^>
echo where ^<N^> is the highest number that occurs in the file name.
goto :eof

:begin
set N=%~1
rem create empty file
copy nul temp.txt
rem just loop from 1 to N
for /l %%x in (1,1,%N%) do call :concat %%x
rename temp.txt result.txt
goto :eof

:concat
  copy temp.txt+file%1.txt temp2.txt
  move /y temp2.txt temp.txt
goto :eof

未经测试，但它非常简单，所以我怀疑其中有太多错误。

或者，我只是认为以下操作会更容易（在命令行上）：

(for /l %x in (1,1,N) do type file%x.txt) > result.txt

只需替换N为您拥有的最高后缀即可。

于 2011-07-23T06:52:11.007 回答
0

在命令提示符下，您可以执行， type *.txt > destination.txt

注意：这也会连接子目录下的文本文件

于 2015-11-18T09:19:59.720 回答
-1

我记得有一个非常有用的程序：split & concat。对于mac os x ...不知道是否有其他操作系统版本...可以正常工作！http://loekjehe.home.xs4all.nl/Split&Concat/

于 2011-07-23T05:14:54.547 回答