% Set fso = CreateObject("Scripting.FileSystemObject") path = "D:/inetpub/move2apartment/northamerica/usa/newyork/" %>