いくつかのテキスト ファイルをすべて同じディレクトリに出力しました。各 .txt ファイルにはグループ番号が含まれています。この番号は常に RXC で始まり、その後 5 文字以上になる可能性があるため、RXCXXXXX を指定します。この RXC 番号を見つけて、ファイルの名前を対応するグループ番号に変更するスクリプトが必要です。同じディレクトリ内のすべてのファイルで同じです。
前もって感謝します、ジョー
いくつかのテキスト ファイルをすべて同じディレクトリに出力しました。各 .txt ファイルにはグループ番号が含まれています。この番号は常に RXC で始まり、その後 5 文字以上になる可能性があるため、RXCXXXXX を指定します。この RXC 番号を見つけて、ファイルの名前を対応するグループ番号に変更するスクリプトが必要です。同じディレクトリ内のすべてのファイルで同じです。
前もって感謝します、ジョー
Set objFS = CreateObject("Scripting.FileSystemObject")
strFolder="c:\test"
Set objFolder = objFS.GetFolder(strFolder)
For Each strFile In objFolder.Files
If objFS.GetExtensionName(strFile) = "txt" Then
strFileName = strFile.Name
Set objFile = objFS.OpenTextFile(strFileName)
Do Until objFile.AtEndOfStream
strLine=objFile.ReadLine
If InStr(strLine,"RXC" ) > 0 Then
number=Mid(strLine,4)
objFile.Close
strFile.Name = Trim(number)&".txt"
Exit Do
End If
Loop
End If
Next
using System.IO;
foreach(var file in Directory.GetFiles("."))
{
var content = File.ReadAllText(file);
var startIndex = content.IndexOf("RXC");
var id = content.Substring(startIndex, 8);
File.Move(file, id);
}