<%
Function Filtrele(strKelime)
strKelime = Replace(strKelime, ">" , "<", 1, -1, 1 )
strKelime = Replace(strKelime, "<" , ">", 1, -1, 1 )
strKelime = Replace(kelime, "'" , "", 1, -1, 1 )
Filtrele = strKelime
End Function
Gelen Veri = Filtrele(Request.Form("isim"))
%>