联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
set fso=CreateObject("Scripting.FileSystemObject") set file=fso.Opentextfile("文件1.txt") set fileN=fso.Createtextfile("转换后的文件1.txt") str=file.readall strN=replace(str,"|",chr(10)) fileN.write strN fileN.close