第二引数に指定されたファイルから読んで、第三引数に指定されたファイルに書く lesson004.vbs Dim objFs : Set objFs = CreateObject("Scripting.FileSystemObject") Dim objTextIn : Set objTextIn = objFs.OpenTextFile(WScript.Arguments(1), 1 ) Dim ob…