asp自动补全html标签自动闭合(正则表达式)
来源：asp之家 发布时间：2013-06-01 20:01:59
代码如下:
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
0
投稿猜你喜欢
- 在IE7还不支持counter 和increment 属性之前，我从来没有用过它们，也从来没有使用过:before 伪元素和content
- Web 标准要求一览表Russ WeakleyJjgod Jiang14-Aug-2004目录1 Web 标准，不仅仅是“不用表格的站点”2
- CSS制作滑动折叠的文字效果，可以用于二级导航菜单的制作，不错的下拉菜单。<!DOCTYPE html PUBLIC "-/
- 是在客户端确认还是在服务器端确认？ <SCRIPT LANGUAGE="VBSc
- XPath(XML Path language)是一种处理XML文档段的语言。XSLT(Extensible Stylesheet Lang
小毅的blog：http://andymao.com/前天网上有个朋友发给我一个页面让我帮她看一下为什么鼠标翻转实现不了。我打开源文件看了一- 在Linux下C连接MySQL出现问题如下：编译成功后，运行程序，出现./connect: error while loading shar
- 引子编程世界里只存在两种基本元素，一个是数据，一个是代码。编程世界就是在数据和代码千丝万缕的纠缠中呈现出无限的生机和活力。数据天生就是文静的
- 我把数据库操作类整理了一下,它包含了常用的数据库操作,由三种方式:简单的SQL拼接字符串的形式,SQL语句使用参数的形式和存储过程的形式,每
- 如何用SQL 建表？ 如下：CREATE TABLE statement
- 一直在用JS写ASP,也不是特别原因,只是当初学的是JS,后来学ASP时知道ASP也可以用JS写,就没去学VBS.前几个月刚学ASP的时候找
- 索引是以表列为基础的数据库对象。索引中保存着表中排序的索引列，并且纪录了索引列在数据库表中的物理存储位置，实现了表中数据的逻辑排序。通过索引
- 应用目标：制作文字特效 应用软件：Dreamweaver MX操作难度：★★☆☆☆我们常用的网页制作工具Dreamweaver MX不仅可以
- 1、仅 Safari 和 Opera 识别的 Hack@media all and (min-width:&n
- 表示文字链接最清楚的方式是“蓝色文字+下划线”，这是在浏览器发展过程中形成的。这个问题大家都说过很多次了，我也曾经说过。然而，这样的规范却总
- “In the latest release 10.2 Oracle changed these default values. The m
- 我们经常会用到表格数据，在做表格的时候，一般都喜欢隔行变色，使表格表现数据的时候非常的清晰。如图，我设计的一个表格表现的样式：在网上找到一个
- 国 * 公司安全团队开发出利用赛门铁克数据库安全与审计(SDSA)设备监视数据库的一系列客户化的政策。他们是如何在已有安全策略基础上做优
- 从今天开始，我将全面的共享出我所能理解的所有WEB标准方面的知识放在这个“WEB标准能有多难？”的专栏里。当然由于振之的水平有限，所讲并非是
- 在印刷排版中“point”是一个绝对的单位，它等于 1/72 英寸。可以用尺子丈量的，物理的英寸。但在CSS中pt的含义
