Using createTextFile() to create a text file, but weird thing happens

I want to create a text file, and use the method createTextFile(), code as following:   Dim oFSO,OpenFile   CreateFolder(sFilePath)   set oFSO = CreateObject ("Scripting.FileSystemObject") set...