Question

可能重复：
Read multiple text files in a folder

我有一个包含文件的文件夹，例如： 123.psd 12345.psd 123456.psd 等，我想把文件夹里的所有名字都刮成TXT文件我怎么做？谢谢！

Answer 1

您可以使用Path.GetFileNameWithoutExtension：

Dim filesNames = From path In IO.Directory.EnumerateFiles("C:\Temp")
                 Select IO.Path.GetFileNameWithoutExtension(path)
IO.File.WriteAllLines("C:\Filenames.txt", filesNames)

编辑：这是一个适用于.NET 3.5的版本：

Dim filesNames = From path In IO.Directory.GetFileSystemEntries("C:\Temp")
         Select IO.Path.GetFileNameWithoutExtension(path)
IO.File.WriteAllLines("C:\Filenames.txt", filesNames.ToArray)

这甚至可以在.NET 2中运行：

Dim filesNames = IO.Directory.GetFileSystemEntries("C:\Temp")
Dim fileNamesWithoutExtension(filesNames.Length - 1) As String
For i = 0 To filesNames.Length - 1
    fileNamesWithoutExtension(i) = IO.Path.GetFileNameWithoutExtension(filesNames(i))
Next
IO.File.WriteAllLines("C:\Filenames.txt", fileNamesWithoutExtension)

文件夹中的简单名称刮刀

1 个答案: