Asp ile bir harfin kelime içinde kaç defa geçtiğini bulmak.

Aşağıdaki fonksiyonu kullanarak bir karakterin veya bir harfin kelime yada cümle içinde kaç defa tekrarlandığını bulabilirsiniz.Örneğin boşluk veya nokta karakterleri cümlede kaç defa geçiyor bulup cümleyi oradan kesebilirsiniz. Metin kısaltmada kullanılabilir.

 

<%
‘ Fonksiyona gönderilen veri içinde, istediğiniz karakterin kaç efa geçtiğini sayar
Function KarakterSay(byVal strVeri, byVal strKarakter)
Dim intSayi, intVeriUzunluk
If strVeri = “” OR strKarakter = “” Then Exit Function
intSayi = 0
intVeriUzunluk = Len(strVeri)
For intLooper = 1 To intVeriUzunluk
If Mid(strVeri, intLooper, 1) = strKarakter Then
intSayi = intSayi + 1
End If
Next
KarakterSay = intSayi
End Function

‘ Örnek kullanım
sonuc = KarakterSay(, “@”)

%>

 

Klasik asp ile kelime içinde bir harfin kaç defa tekrarlandığını bulun. Cümlede harfin kaç defa tekrarlandığını bulmak. Bir karakter cümle içinde kaç defa kullanılıyor bulma fonksiyonu.

Asp ile bir harfin kelime içinde kaç defa geçtiğini bulmak
Facebooktwittergoogle_plusredditpinterestlinkedintumblrmail