Asp kodu olarak az sayıda bulabileceğiniz bi fonksiyondur.
Ortalıkta Gereksiz işlemler içeren aslında gizlenmeyen sadece gizleniyormuş gibi duran(html)
bir çok kod bulunuyor. Bu işe el attım gayet kısa bir kod performans açısından daha iyi, anlaşılması basit..
Hemen Kodu Vereyim Kullanımınıda Anlattım.
<%
Function LinkGizle(adres)
Do While inStr(adres,"<a ")>0 and inStr(adres,"/a>")>0
bas=inStr(adres,"<a ")
bit=inStr(adres,"/a>")+3-bas
Gizle=Mid(adres,bas,bit)
adres=Replace(adres,Gizle,"<b>Linki Gizlendi</b>")
Loop
LinkGizle=adres
End Function
%>
Örnek Kullanım:
<%
yazdir="Ücretsiz Blog Scripti: <a href='http://webixir.com'>Burası Gizleniyor</a> <br>tixmc a.k.a efendy"
response.write LinkGizle(yazdir)
%>
Şart deyimlerini kendiniz yerleştirirsiniz.
<%
if ... then
response.write LinkGizle("..")
else
response.write ".."
end if
%>
Gibisinden karmaşık bişey yok. Kod Tamamen Bana Aittir.
