'''''''''If FileSys.FileExists("c:\data\123.txt") Then
FileSys.WriteAllText("c:\data\123.txt",ss.ToString,False,Encoding.UTF8) Else FileSys.CreateDirectory("c:\data\123.txt") FileSys.WriteAllText("c:\data\123.txt",ss.ToString,False,Encoding.UTF8) End If