Java コードを使用して、サブフォルダー内のものも含め、フォルダー内のすべての txt ドキュメントを読み取ります。

＃＃＃＃＃＃＃＃＃＃＃＃コード！サブフォルダー内のtxtファイルを含むJavaのフォルダー内のすべてのtxtドキュメントを読み取る方法

新しいクラスを作成し、FileHandler という名前を付け、その中に次のコードを挿入し、basePath を読み取りたいフォルダーのパスに設定します。読み取りメソッドと書き込みメソッドが提供されており、必要に応じて呼び出すことができます。 ```ジャバ java.io.ファイルをインポートします。 java.io.FileWriterをインポートします。 インポート java.io.IOException; java.nio.file.Filesをインポートします。 java.nio.file.Pathsをインポートします。 パブリック クラス FileHandler { プライベート文字列ベースパス; public FileHandler(String BasePath) { this.basePath = ベースパス; } public String readFile(String fileName) throws IOException { 文字列 filePath = BasePath File.separator fileName; byte[] bytes = Files.readAllBytes(Paths.get(filePath)); 新しい文字列(バイト)を返します。 } public void writeFile(String fileName, String

静的文字列basePath=＂/home/csvDir＂;

/**

# csv に一致するフォルダー内のすべてのファイルを検索します。

#* @param dir 検索するフォルダー オブジェクト

**/

public static void findFile(File dir) は IOException をスローします{

ファイル[] dirFiles = dir.listFiles();

for(ファイル一時: dirFiles){

if(!temp.isFile()){

findFile(temp);

}

//指定されたファイルを検索します

if(temp.isFile() & temp.getAbsolutePath().endsWith(＂.txt＂) ){

System.out.println(temp.isFile() " " temp.getAbsolutePath());

readFileContent(temp);

}

}

}

/**

* @param file 読み込むファイルオブジェクト

* @return ファイルの内容を返します

**/

public static String readFileContent(File file) が IOException をスローします{

FileReader fr = 新しい FileReader(ファイル);

BufferedReader br = 新しい BufferedReader(fr);

StringBuffer sb = new StringBuffer();

while(br.ready()){

sb.append(br.readLine());

}

System.out.println(sb.toString());

return sb.toString();

}

/**

* @param file 書き込むファイルオブジェクト

* @param content 書き込むファイルの内容

**/

public static void writeFileContent(File file,String content) throws IOException{

FileWriter fw = 新しい FileWriter(ファイル);

fw.write(コンテンツ);

fw.flush();

fw.close();

}

public static void main(String[] args) {

＃＃＃試す {＃＃＃

findFile(新しいファイル(ベースパス));

} catch (IOException e) {

// TODO 自動生成された catch ブロック

e.printStackTrace();

}

}

ハイスコアコード! VBA を使用して、

を含むフォルダー内のすべての txt ファイルを取得する方法

サブt()

Dim fso、f、f1、fc、s、r

Const ForReading = 1、ForWriting = 2

Set fso = CreateObject("Scripting.FileSystemObject")

'Set fc = fso.GetFile(WScript.ScriptFullName).ParentFolder.Files

Set fc = fso.GetFolder("c:\windows").Files 'c:\windows を使用する場合は実際のフォルダーに変更してください

L = 1

fc の各 f1 について

EXTName = UCase(fso.GetExtensionName(f1.Name))

EXTName = "TXT" の場合、

Set fs = fso.OpenTextFile(f1, ForReading)

fb = fs.ReadAll

If InStr(1, fb，"Apple") > 0 then

セル(L, 1) = f1.名前

セル(L, 2) = f1.Path

L = 長さ 1

終了の場合

終了の場合

＃＃＃次＃＃＃

エンドサブ

以上がJava コードを使用して、サブフォルダー内のものも含め、フォルダー内のすべての txt ドキュメントを読み取ります。の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。