smith203 当前离线
上等兵
apang 当前离线
上将
不好意思, 两个都没有用啊, 能不能麻烦再看看? smith203 发表于 2012-11-17 16:14
TOP
BAT-VBS 当前离线
少将
sed "s/...../&\n/g" a.txt >b.txt复制代码
Set FSO = CreateObject("Scripting.FileSystemObject") Text = FSO.OpenTextFile("a.txt",1).ReadAll With New RegExp .Pattern = "(.{5}|.+$)" .Global = True .Multiline =True Str = .Replace(Text,"$1"&vbCrLf) End With FSO.CreateTextFile("b.txt",True).Write Str MsgBox "OK"复制代码