teşekkür ederim
aspindir den bi kod buldum buda işimi gördü belki başkalarının işinede yarar
<%
Function HtmlEncodeYazi(text)
Set objReg = New RegExp
objReg.Global = True
objReg.IgnoreCase = True
objReg.Pattern = "<[^>]+>"
YeniText = objReg.Replace(text,"")
Set objReg = Nothing
HtmlEncodeYazi = YeniText
End Function
%>
<meta name="Description" content="<%=left(HtmlEncodeYazi(cat("tanim")),150) %>">