ASP secara otomatis melengkapi tag html dan menutupnya secara otomatis, yang memfasilitasi ASP untuk mencegat konten dengan tag html dan mencegah deformasi halaman. Salin kode sebagai berikut:
Fungsi closeHTML(strContent)
Redupkan arrTags, i, OpenPos, ClosePos, re, strMatchs, j, Match
Setel re = RegExp Baru
re.IgnoreCase = Benar
re.Global = Benar
arrTags = Array(p, div, span, tabel, ul, font, b, u, i, h1, h2, h3, h4, h5, h6)
Untuk i = 0 Ke UBound(arrTags)
OpenPos = 0
TutupPos = 0
re.Pola = /< + arrTags(i) + ( [^/</>]+|)/>
Setel strMatchs = re.Execute(strContent)
Untuk Setiap Pertandingan di strMatchs
OpenPos = OpenPos + 1
Berikutnya
re.Pola = /</ + arrTags(i) + />
Setel strMatchs = re.Execute(strContent)
Untuk Setiap Pertandingan di strMatchs
ClosePos = ClosePos + 1
Berikutnya
Untuk j = 1 Ke OpenPos - ClosePos
strKonten = strKonten + </ + arrTags(i) + >
Berikutnya
Berikutnya
closeHTML = strKonten
Fungsi Akhir