gpt4 book ai didi

asp自动补全html标签自动闭合(正则表达式)

转载 作者:qq735679552 更新时间:2022-09-29 22:32:09 31 4
gpt4 key购买 nike

CFSDN坚持开源创造价值,我们致力于搭建一个资源共享平台,让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章asp自动补全html标签自动闭合(正则表达式)由作者收集整理,如果你对这篇文章有兴趣,记得点赞哟.

代码如下

Function closeHTML(strContent)  Dim arrTags, i, OpenPos, ClosePos, re, strMatchs, j, Match  Set re = New RegExp  re.IgnoreCase = True  re.Global = True  arrTags = Array("p", "div", "span", "table", "ul", "font", "b", "u", "i", "h1", "h2", "h3", "h4", "h5", "h6")  For i = 0 To UBound(arrTags)  OpenPos = 0  ClosePos = 0  re.Pattern = "\<" + arrTags(i) + "( [^\<\>]+|)\>"  Set strMatchs = re.Execute(strContent)  For Each Match in strMatchs  OpenPos = OpenPos + 1  Next  re.Pattern = "\</" + arrTags(i) + "\>"  Set strMatchs = re.Execute(strContent)  For Each Match in strMatchs  ClosePos = ClosePos + 1  Next  For j = 1 To OpenPos - ClosePos  strContent = strContent + "</" + arrTags(i) + ">"  Next  Next  closeHTML = strContent  End Function  。

最后此篇关于asp自动补全html标签自动闭合(正则表达式)的文章就讲到这里了,如果你想了解更多关于asp自动补全html标签自动闭合(正则表达式)的内容请搜索CFSDN的文章或继续浏览相关文章,希望大家以后支持我的博客! 。

31 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com