リンク
デスクトップのターゲットフォルダを取得する定番メニュー
Set objShell = Wscript.CreateObject("WScript.Shell")
Set objFS = WScript.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(objShell.SpecialFolders("Desktop") & "\CONVERT")
For Each objFile IN objFolder.Files
テキストを一つずつオープンする → objFS.OpenTextFile(objFile.Path, ForReading)
Next