d12990 发表于 2012-2-12 14:26:24

文本整理器，如何去除多余字符

如图 ，每个邮件地址后面都有一段一些字母数字，把他批量删除，整理成如下结果，这样的小工具
怎么写




afan 发表于 2012-2-12 14:49:28

Local $sFile = 'test.txt'

Local $Str = FileRead($sFile)
Local $sRER = StringRegExpReplace($str, '\h+\V*', '')
FileMove($sFile, $sFile & '.bak')
FileWrite($sFile, $sRER)

lpxx 发表于 2012-2-12 16:31:06

其实也就是匹配邮箱地址。

xyhqqaa 发表于 2012-2-13 08:39:59

路过围观、、谢谢分享
页: [1]
查看完整版本: 文本整理器，如何去除多余字符