Asp ile bir değişkende tuttuğunuz veriler içindeki html kodlarını ayıklamak için aşağıdaki fonksiyonu kullanabilirsiniz. Bu fonksiyon meta tagları için kullanılabilir. Örneğin description meta değeri için şeklinde çağırmamız yeterli. Tabi description için 255 karekteri geçmemeniz seo açısından önemlidir. Bunun için de kodları şeklinde yazmamız işimizi görecektir.

Fonksiyon aşağıda. Fonksiyon “<” ile “>” arasındaki kodları temizlemektedir. Bunun için instr,left ve mid hazır fonksiyonlarını kullanıyoruz. Başlangıç “<” karekterinin konumu, bitiş “>” karekterinin konumu şeklinde alınıyor.
<%
Function HtmlAyikla( strText )
Dim nPos1
Dim nPos2

nPos1 = InStr(strText, “<”) Do While nPos1 > 0
nPos2 = InStr(nPos1 + 1, strText, “>”)
If nPos2 > 0 Then
strText = Left(strText, nPos1 – 1) & Mid(strText, nPos2 + 1)
Else
Exit Do
End If
nPos1 = InStr(strText, “<”) Loop HtmlAyikla= strText End Function %>