ASP / .Asp De Kelime Sayısını Bulma

< % Function Kelimebul(Gelen) Gelen=Trim(Gelen) If Gelen="" Then Exit Function KelimeParcala=Split(Gelen," ") Kelimebul=Ubound(KelimeParcala,1)+1 End Function ="merhaba deneme yazisi yazdik kelime sayisini bulacagiz " Saybakalim=Kelimebul(Kelime) Response.Write (Saybakalim) 'Sonuç 7 Kelime %>

©

turkircmircindir

 

Bir cevap yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir