［Script］［VBS］フォルダ内の全ファイルに対して処理を行うループを組む

VBScript で指定したフォルダ内の全ファイルに対して処理を行うようにループを組みます。

Loop_sample.vbs

Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")

'スクリプトのフルパス
strFullPath = WScript.ScriptFullName

'スクリプトの親フォルダ
strDir = objFSO.GetFile(strFullPath).ParentFolder

'スクリプトの親フォルダにある Logs フォルダ
Set objFolder = objFSO.GetFolder(strDir & "\Logs")

'Logs フォルダ内の全ファイルに対して処理を行う
For Each objFile In objFolder.Files
  WScript.Echo "  " & objFile.Name
Next

---

Script のページに戻る