Java---读取文件夹下的目录及文件文件内容

JAVA遍历⽂件夹下的所有⽂件

JAVA遍历⽂件下的所有⽂件和⽂件夹

@Test

public void traverseFolder1( ) {

String path = "D:\\TEST";

int fileNum = 0;

int folderNum = 0;

int foldeNum = 0;

File file = new File(path);

if (file.exists()) {

LinkedList list = new LinkedList();

//list()⽅法是返回某个⽬录下的所有⽂件和⽬录的⽂件名，返回的是String数组

//listFiles()⽅法是返回某个⽬录下所有⽂件和⽬录的绝对路径，返回的是File数组

File[] files = file.listFiles();

for (File file2 : files) {

if (file2.isDirectory()) {

System.out.println("⽂件夹:" + file2.getAbsolutePath());

list.add(file2);

foldeNum++;

} else {

System.out.println("⽂件:" + file2.getAbsolutePath());

fileNum++;

}

}

File temp_file;

while (!list.isEmpty()) {

temp_file = list.removeFirst();//删除第⼀个元素，也就是找到数组中的第⼀个元素返回⼀个File去判断，说⽩了就是循环分别找到每个⽂件下⾯对应的是⽂件还是⽂件夹，如果循环下⼀级还是⽂件夹则继续循环直到结束（思想就是⼀层⼀层去判断查找知道找到所有的⽂件

和⽂件夹，不明⽩看下⾯的例⼦。） files = temp_file.listFiles();

for (File file2 : files) {

最近使用VBA编程，要用到一个功能，使得Excel能够读取指定文件夹下的所有文件名称。

使用的是Excel2010版本，但是在Excel2003版本中能够使用的FileSearch在Excel2010版中会出错，因此不得不另找其它方法，下面介绍三种方法，在Excel单元格中显示特定目录下的文件名称（文件大小，日期时间等），也可以自行修改符合自己的使用要求。在Excel2010和Excel2003版本中均测试过可行。我工作中使用繁体，第三种方法使用的是繁体，所以在简体系统下会乱码，这个不会妨碍程序运行，gongxi1是我设置的一个窗体，可忽略。第三种不仅仅能导入特定文件下的所有文件，也可以导入文件夹下的文件夹文件。

第一种：

Sub testit()

Dim k As Variant

Dim m As Variant

m = 1

myvar = FileList("C:\Users\ownding\SkyDrive\文档\工作事項")

For i = LBound(myvar) To UBound(myvar)

Debug.Print myvar(i)

Next

For Each k In myvar

Sheets("sheet1").Cells(m, 1) = k

m = m + 1

Next k

End Sub

Function FileList(fldr As String, Optional fltr As String = "*.*") As Variant

Dim sTemp As String, sHldr As String

If Right$(fldr, 1) <> "" Then fldr = fldr & ""

sTemp = Dir(fldr & fltr)

If sTemp = "" Then

精品文档

. Excel VbA 读取某个文件夹下所有文件的内容

Sub GetAFolderMoreWorkBooks()

Dim fPath As String ‘路径名

Dim fName As String ‘文件名

Dim sName As String ‘工作表名称

Dim cellRange As String ‘单元格范围

Dim fNameCount As Integer ‘文件数目

Dim fNameList() As String ‘文件名列表

Dim rValue As Variant ‘某个单元格中的值

Dim j As Integer

Dim oldCol As Integer ‘文件夹下表格的活动单元格

Dim newCol As Integer ‘新生成表格的活动单元格

j = 1

oldCol = 11

newCol = 1

fPath = "C:¥Documents and Settings¥USER¥デスクトップ¥check"

sName = "レビュー記録"

fName = Dir(fPath & "¥" & "*.xls")

While fName <> "" ‘获取该文件夹下所有表格的名字

fNameCount = fNameCount + 1

ReDim Preserve fNameList(1 To fNameCount)

fNameList(fNameCount) = fName

fName = Dir

Wend

Workbooks.Add

If fNameCount = 0 Then Exit Sub

rValue = 1

For j = 1 To fNameCount 精品文档

. oldCol = 11

rValue = 1

While rValue <> 0

LinuxC读取⽂件夹下所有⽂件（包括⼦⽂件夹）的⽂件名

Linux C 下⾯读取⽂件夹要⽤到结构体struct dirent，在头#include 中，如下：

#include

struct dirent

{

long d_ino; /* inode number 索引节点号 */

off_t d_off; /* offset to this dirent 在⽬录⽂件中的偏移 */

unsigned short d_reclen; /* length of this d_name ⽂件名长 */

unsigned char d_type; /* the type of d_name ⽂件类型 */

char d_name [NAME_MAX+1]; /* file name (null-terminated) ⽂件名，最长255字符 */

}

其中d_type表明该⽂件的类型：⽂件(8)、⽬录(4)、链接⽂件(10)等。

下⾯程序，递归读取某⽂件夹及其⼦⽂件夹下所有⽂件名：

1 #include

2 #include

3 #include

4 #include

5 #include

6 int readFileList(char *basePath)

7 {

8 DIR *dir;

9 struct dirent *ptr;

10 char base[1000];

11

12 if ((dir=opendir(basePath)) == NULL)

13 {

14 perror("Open dir error...");

15 exit(1);

16 }

17

18 while ((ptr=readdir(dir)) != NULL)

19 {

20 if(strcmp(ptr->d_name,".")==0 || strcmp(ptr->d_name,"..")==0) ///current dir OR parrent dir