Set fs = CreateObject("Scripting.FileSystemObject")