如何用vbs替换文件中的包含某些字符的一行的内容
1个回答
展开全部
set fso=CreateObject("Scripting.FileSystemObject")
Set RegExp = New RegExp
file="1.txt"
find="需要剔除的字符"
read=fso.opentextfile(file).readall
With RegExp
.Global=-1:.ignorecase=-1:.multiline=-1
.pattern="(.*"&find&"*)[\r\n]{0,2}"
if .test(read) then
read=.Replace(read,empty)
fso.createtextfile("new.txt").write read
end if
End With
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询