Öntanımlı fonksiyonlardan "instr" ile yapılan arama script.Yazı içerisinde yazı aramak...

Instr fonksiyonu örnektende görebileceğiniz üzre bir verinin içinde aranılan veya belirtilen verinin olup olmadığını kontrol eden fonksiyondur.

Kullanımı instr(veri,aranilan)şeklindedir.
Bizde şimdi bu özellikten faydalanarak arama scripti oluşturacağız.


'İlk önce verimizi oluşturalım
Dim veri
'Verimize değer atayalım
veri = "Sanalkurs.net Ekin Kadıoğlu"
'Şimdi verimizin içinde aranılacak olan kelime için aynı şekilde tanım yapalım
Dim aranan
aranan = "Sanalkurs.net"

'Şimdide döngü ile kontrol edelim

if instr(veri,aranilan) then
'Bu eğer varsa anlamında kullanılır

response.write("Aradığınız kelime verimizin içinde")

else
'Eğer yoksa...
response.write("Aradığınız kelime verimizde yok")
end if



Yukarıda gösterilen hali en basit kullanımıdır.
Eğer bir form içinden gelen kelimeyi database de herhangi bir yerden gelen veride kontrol edecekseniz, alttaki küçük örnekteki değişiklikleryapılmalıdır.


Dim veri
'database verisi
veri = databaseBaglantisi("isimler")


Dim aranan
'formdan gelen aranacak kelime
aranan = request.form("formdan_gelen")



if instr(veri,aranilan) then

response.write("Aradığınız kelime verimizin içinde")

else

response.write("Aradığınız kelime verimizde yok")
end if