最近写了些小玩意，用到一些在VBS下的正则，主要用作字符匹配和替换，在此仅作记录
先整个函数做替换用
用TAB键替换连续空格（两个以上）
用空格替换特定格式间的逗号，XXXX,X，X都是数字
用空格替换两个非数字字符间的逗号，$1和$2代表逗号两侧原有内容不变，仅作定位用，如果两侧是数字则需要[\d]
ASCII标准字符在http://ascii.cl/可查
先整个函数做替换用
-
Function RegExp(str1, patrn, replStr)
-
Dim regEx
-
Set regEx = New RegExp
-
regEx.Pattern = patrn
-
regEx.IgnoreCase = True
-
regEx.Global = True
-
RegExp = regEx.Replace(str1, replStr)
- End Function
- strContent = RegExp(strContent, "([ ])([ ])+", chr(9))
- strContent = RegExp(strContent, "([0-9][0-9][0-9][0-9])[,]([0-9])", "$1" & chr(32) & "$2")
- strContent = RegExp(strContent, "([\D])[,]([\D])", "$1" & chr(32) & "$2")
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/24644775/viewspace-1299552/ ，如需转载，请注明出处，否则将追究法律责任。
请登录后发表评论
登录
全部评论
最新文章
- Default tmpfs configuration
- Build Physical standby Data Guard On Signal Node
- 用VMware Workstation在Oracle Linux 6.6上部署双节点Grid(11.2.0.4)
- 升级Enterprise Manager 10g (10.2.0.1 -> 10.2.0.5)
- Issue Fix on Enterprise Manager 10 (The OPMN Process Manager failed to start)
- Issue Fix on 11g ($ORACLE_HOME/libnnz11.so)
- 在Oracle Linux 7上安装Oracle Database 12c（单实例）
- 413课堂练习《第十四章》配置系统审计
- 413课堂练习《第十三章》配置系统日志
- Linux认证简介
