赤九马猴的武器是什么:ASP使用正则表达式批量将HTML代码里的标签大写转换成小写

来源:百度文库 编辑:九乡新闻网 时间:2024/10/02 17:17:58
编辑器做的代码,每次发布文章时HTML标签都是大写的,一直没找到解决办法,今天去搜索了下,先找个治标的方法用用,关键问题还得修改编辑器。
现在把代码共享出来,省得大家去找。
大家在做程序的时候,都了解了,搜索引擎对html标签及代码都需要规范,比如不能有不闭合的标签等。
还有一个重要的规范,就是标签一定要小写。
在很多时候,使用网页编辑器在后台编写文章,编辑器经常会自动将标签小写转成大写,这样很不友好,下面,我就来介绍一下如何使用正则表达式来批量将HTML标签大写转换成小写。
特别是在后台使用的时候,可以将html代码标签替换成小写。 
Function oflink_lcasetag(imgstrng)
 Dim regEx, Match, Matches '建立变量。
 Set regEx = New RegExp '建立正则表达式。
 regEx.Pattern = "<.+?\>" '设置模式。
 regEx.IgnoreCase = true '设置是否区分字符大小写。
 regEx.Global = True '设置全局可用性。
 Set Matches = regEx.Execute(imgstrng) '执行搜索。
 imgstrng=imgstrng
 For Each Match in Matches '遍历匹配集合。
 imgstrng=replace(imgstrng,Match.Value,lcase(Match.Value))
 Next
 oflink_lcasetag = imgstrng
End Function