|
|
| |
ASP de String Fonksiyonlar (UCase,Trim, Ltrim, Rtrim) |
|
|
UCase(Degisken): Upper Case yani büyük harfli hal anlamindadir. Verdigimiz stringteki tüm harfleri büyük hallerine dönüstürür. Sonucu "ASP ÖGRENIYORUZ" olarak görecegiz. Gerek Ucase, gerekse Lcase komutlari, sunucunun bölgesel ayarlarina göre degisebilir. VBScript temelinde ingilizce oldugundan, sorun çikarabilecek harf "i" ve "I" karakterleridir. "I" küçüldügünde "i" olacaktir. "i" harfi büyümeyebilir. Bu komutlarin saglikli islenmesi içIn bölgesel ayalari Türkçe olan sunucu seçmenizi tavsiye ederiz. Trim, Ltrim, Rtrim: Bir degiskenin sagindaki, solundaki veya her iki tarafindaki bosluklari temizler. Formlarda yanlislikla basilan bosluklari yok etmek içIn kullanilir. Örnegin degiskenimiz " ASP Ögreniyorum " olsun. Basinda 1, sonunda 2 bosluk olan bir dizi. Sonucumuz "ASP Ögreniyorum" çikacaktir. Response.Write Ltrim(Degisken) ile "ASP Ögreniyorum " , Rtrim(Degisken) ile " ASP Ögreniyorum" sonucunu alacagiz. String(Sayi, degisken) : String komutu verilen degiskeni "Sayi" kadar çogaltir. Örnegin: Alacagimiz sonuç "EmreEmreEmre" seklindedir. Mid: Bir degiskenin içinden baslangiç noktasini ve kaç karakter olacagini verdigimiz baska bir degiskeni verir. Örnegin: <% Degisken = "ASP ögreniyoruz" YeniDegisken = Mid(Degisken, 4, 2) Response.Write YeniDegisken %> "ög" sonucunu alacagiz bu sorgudan sonra. Burada 4 baslangiç karakterimiz, 2 ise kaç karakter alacagimizi temsil ediyor. Replace: Degiskende belirli karakterleri baskalariyla degistirmemize yariyor Replace komutu. Örnek vermek gerekirse: <% Degisken = "ASP ögreniyoruz" YeniDegisken = Replace(Degisken, "uz", "m ben de") Response.Write YeniDegisken %> Ekrana yazilacak sonuç "ASP ögreniyorum ben de" olacaktir. Replace ile istediginiz karakterden itibaren kaç tane tanimlamaya uyan varsa onlari degistirebilirsiniz. Örnegin <% Degisken = "Kartal kalkar, dal sarkar" YeniDegisken = Replace(Degisken, "a", "e", 6, 3) Response.Write YeniDegisken %> Sonucunu "Kartal kelker, del sarkar" olarak alacagiz. 6. karakterden itibaren 3 tane "a" yi "e"ye dönüstürmeyi tanimladik. Replace komutu ayni zamanda belirli dizilerden istediklerimizi silmeye de yarayabilir. <% Degisken = "Kartal kalkar, dal sarkar" YeniDegisken = Replace(Degisken, "a", "") Response.Write YeniDegisken %> Yeni Degiskenimiz "Krtl klkr, dl srkr" seklinde olacaktir. Len(KarakterDizisi) Bir karakter dizisinin kaç harf veya karakterden olustugunu vermektedir. Örnegin: <% Dizi = "Emre" Response.Write Len(Dizi) %> Ekrana 4 olarak yansiyacaktir. Üstteki email örnegimizde de bunu kullanabiliriz. Email adresleri isim@domain.tür veya isim@domain.tür.ülke seklindedir. @ , (.) nokta ve bunlarin kullanici ismi içIn en az 1, domain içIn en az 1 ve domain.tür (com.tr, co.uk, com, net, org) gibi uzantilarda da en az 3 harf olacagi içIn 7 karakterden kisa olmamalidir. Üstteki örnegimize emailkontrol.asp dosyamizdaki If satirini söyle de degistirebiliriz. If Kontrol1 > 0 And Kontrol2 > 0 And Len(Email) >= 7 Then Yani Emailimizin uzunlugunun da 7 karakterden büyük olmasi sartini eklemis olduk. Left(Degisken, Sayi): Bir yazi dizisindeki karakterlerin, soldan "Sayi" kadarini gösterir Örnegin: <% Soldanbes = Left("ASP ögreniyoruz.", 5) Response.Write soldanbes %> Sonucumuz "ASP ö" olacaktir. Right(Degisken, Sayi): Bir yazi dizisindeki karakterlerin, sagdan "Sayi" kadarini gösterir. Kullanimi Left ile aynidir. LCase(Degisken): Lower Case yani küçük harfli hal anlamindadir. Verdigimiz String’teki tüm harfleri küçük hallerine getirir. <% Degisken = "ASP ögreniyoruz" Response.Write Lcase(Degisken) %> Sonucu "asp ögreniyoruz" olarak görmekteyiz. String Fonksiyonlari Visual Basic’te String tanimlamasi, karakter veya sari dizisi olarak söylenebilir. Stringlere bir çok örnek verilebilir. "Benim adim Emre" veya "Ahmet saat 3:00’te buraya gelecek" birer String yapisidir. Sayfalarda gerek formlar, gerek querystringlerle tasinan bilgiler de String örnegi olarak verilebilir. Ama sayfalarimiza bu verileri isleyebilmek içIn, onlari isleyebilecek fonksiyonlara ihtiyaciniz olacaktir. InStr Karakter dizilerinin içinde baska bir karakter dizisini veya karakteri sorgulamaya yarayan bir komut olan InStr, bulunup bulunmadigini, bulunursa kaçinci karakter veya baslama noktasindan itibaren kaçinci karakterde basladigina dair bilgileri verir. Örnegin <% Dizi = "ASP kursu içerisinde VBScripti isliyoruz" AranacakStr = "VB" Kacinci = InStr(Dizi, AranacakStr) Response.Write Kacinci %> Burada ekranimizda görünecek olan sayi 22’dir. "VB" yazisi Dizi degiskeninde 22. karakterden baslamaktadir. InStr’nin bir diger kullanimi ise, hangi karakterden sonra baslayacagimizdir. Kacinci = InStr(3, Dizi, AranacakStr) Yani bastan 3. karakterden sonra "VB" karakter dizini kaçinci karakterde gelmektedir seklinde bir sorgu yaratmakta ve sonucunu 19 olarak almaktayiz. InStr, karakter karsilastirma olarak da kullanabilecegimiz bir komuttur. Örnegin formunuzda, kullanicilarinizda email adresi talep ettiniz ve email adresinin en azindan normlara uygun olmasini istiyorsunuz. Formumuzu yazalim Form.asp <HTML> <HEAD> <TITLE>Email Adresinizi giriniz</TITLE> </HEAD> <BODY BGCOLOR="#FFCC00"> <FORM METHOD="POST" ACTION="emailkontrol.asp"> <b>Lütfen Emailinizi Giriniz: </b><br> <Input NAME="email" Type="Text" SIZE="30"> </FORM> </HTML> Burada gönderecegimiz ASP’nin de kodunu birlikte yazalim Emailkontrol.asp <% Dim email Email = Request.Form("email") ’ Emaillerde standart olarak bulunmasi gereken veriler @ isareti ve en az 1 tane noktadir. Kontrol1 = InStr(Email, "@") Kontrol2 = InStr(Email, ".") ’ Kontrol1 ve kontrol2’nin sonucunun 1’den büyük olmasi gerekmektedir. If ile sorgulamamizi yapalim If Kontrol1 > 0 And Kontrol2 > 0 Then Response.Write "Email dogrulandi" Else Response.Write "Emailiniz hatalidir" End If %>
Okunma : 229 |
|