VBS怎样把逗号替换为竖线？

kangta122

1,lv-ffx,"2,537",UDP,218.2
1,lv-ffx,"2,537",UDP,218.2
1,lv-ffx,"2,537",UDP,218.2
...

有这么一个.csv文件
怎样把","替换成"|"，但（"2,537"）双引号内逗号并不进行替换，该如何实现啊？？？

多谢！！！

kangta122

原帖由 asnahu 于 2011-1-28 15:47 发表
Dim strFile: strFile = "urfile"
Dim FSO:     Set FSO = CreateObject("Scripting.FileSystemObject")
Dim objFile: Set objFile = FSO.OpenTextFile(strFile)
Dim strContent: strContent = objFile.Readall
...

能简单解释一下吗？看不太懂，谢谢！！

kangta122

能不能把双引号之间的“|”替换回来，而不是数字之间的啊！！

kangta122

原帖由 asnahu 于 2011-1-28 16:45 发表
strContent = RegExp(strContent, "([\d])[|]([\d])", "$1" & chr(44) & "$2")
改为：
strContent = RegExp(strContent, chr(34) & "(.*)[|](.*)" & chr(34) , chr(34) & "$1,$2" & chr(34))

再请教一下：如果双引号之间有多个"|"这样就没法转换回来了。该如何处理啊？？谢谢

kangta122

原帖由 slore 于 2011-1-30 12:43 发表
CSV
用EXCEL打开。。。然后复制后保存=。=
Tab字符随便换啦。

这个是每天进行的操作，不可能都手工操作！！