vbs 删除 文本文件内 所有空格

有一个文本文件 a.txt, 200M+, 想去除里面所有的空格后输出b.txt，请教用VBS怎么写？

file=".\A.txt"
out=".\2.txt"

set fso=createobject("scripting.filesystemobject")
set f=fso.opentextfile(file)
if fso.fileexists(out) then filedelete(out)
set l=fso.createtextfile(out)

while f.atendofline <> true or f.atendofstream<>true
l.writeline(replace(f.readline," ",""))
wend
wscript.echo "OK"

1.用 chr(34) set ws = wscript.createobject("wscript.shell") path2=chr(34)&"c:\documents and settings\email\桌面\网络游戏\大话西游.lnk"&chr(34) ws.run path2 2.用引号 set ws=wscript.createobject("wscript.shell") path2="""c:\documents and settings\email\桌面\网络游戏\大话西游.lnk""" ws.run(path2)

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息