Home » Posts tagged 'asp' (Sayfa 2)
ASP ile sık kullanılan fonksiyonlar ve kullanım şekilleri (Bölüm 1)

Trim: Türkçe karşılığı düzeltmek, kesip budamak vb.. anlamlara geliyor. Verinin başındaki ve sonundaki boşlukları almaya yarıyor. Üç şekilde kullanımı bulunuyor. LTrim: Burdaki “L” Left in yani sol un kısaltılmış hali. RTrim: Burdaki “R” Right in yani sağ ın kısaltılmış hali.

        degisken = " 123456789 "
	Response.Write Trim(degisken) ' Çıktısı (123456789) şeklindedir.
	Response.Write LTrim(degisken) ' Çıktısı (123456789 ) şeklindedir.
	Response.Write RTrim(degisken) ' Çıktısı ( 123456789) şeklindedir.

FormatNumber: Gelen sayısal değeri biçimlendirmek, özelliklede virgüllü sayıların virgülden sonraki basamaklarını tahin etmek için kullanılır.

degisken = "123,5592"
degisken1 = "125"
	Response.Write FormatNumber(degisken,2) 'çıktı 123,56 şeklindedir. Buradaki 2 virgülden sonraki basamak sayısını ifade eder.
	Response.Write FormatNumber(degisken1,2) 'çıktı 125,00 şeklindedir.
	Response.Write FormatNumber(degisken1,3) 'çıktı 125,000 şeklindedir.

Len: Length kelimesinin kısaltılmış halidir. Türkçe karşılığı uzunluktur. Veri içindeki karakter sayısını geri döndürür.

degisken = "apostylee.com"
	Response.Write Len(degisken) ' Çıktı 13 dür.

Left, Right: Türkçe karşılığı sol ve sağ olan bu fonksyionlarla, verinin soldan ve sağdan görünecek karakter sayısını belirleyebiliyoruz. Değişkenimizden sonraki sayı kaç karakterin alınacağını ifade eder.

degisken ="bu bir soldan sağdan kırpma örneğidir."
	Response.Write Left(degisken,6) ' çıktı (bu bir) şeklindedir.
	Response.Write Right(degisken,10) ' çıktı (örneğidir.) şeklindedir.
ASP Fonksiyon (Function) Kullanımı

Fonksiyonlar genellikle tekrarlanan işlemleri bir kerede yapmak için kullanılan, hem kodlamayı hemde hata bulmayı kolaylaştıran vazgeçilmez özelliğimizdir. Hemen bir örnekle fonksiyon kullanımı anlayalım.

Function fonksiyonAdi(veri1,veri2)
   if veri1 = veri2 Then
       fonksiyonAdi = "Veriler Birbirine Eşit."
   Else
       fonksiyonAdi = "Veriler Eşit Değil."
   End if
End Function

  ' deneme = deneme olduğu için ekrana Veriler Birbirine Eşit. yazısı çıkacaktır.
  Response.Write fonksiyonAdi("deneme","deneme")
  ' deneme, asdas ye eşit olmadığı için ekrana Veriler Eşit Değil. yazısı çıkacaktır.
  Response.Write fonksiyonAdi("deneme","asdas")

Belki biraz anlamsız bir örnek oldu ama olayın mantığını anlamak için yeterli olduğuna inanıyorum. Anlaşılmayan yerleri, bu yazının altına yorum olarak eklersiniz, elimden geldiğince cevap vermeye çalışacağımdan emin olabilirsiniz.

ASP Split Kullanımı..

Merhabalar efendim, kabaca split fonksiyonunun kullanımını örneklemeye çalışacağım.. Split kelime anlamı olarak bölünme, parçalama vari bir anlama geliyor. Örneğin; deneme1,kitap,defter gibi bir veriden sadece “deneme1″ “kitap” “defter” kelimelerini çekip kullanmak istiyoruz. Burada ihtiyacımız olan fonksiyon split !

gelenveri = "deneme1,kitap,defter"
gelenveriParcala = Split(gelenveri,",")
Response.Write gelenveriParcala(0) &"
" 'deneme1
Response.Write gelenveriParcala(1) &"
" 'kitap
Response.Write gelenveriParcala(2) &"
" 'defter

Genellikle split fonksiyonun yanında Ubound da kullanılır. Ubound split ile parçaladığımız verinin adetini sayar. Örneğin;

>gelenveri = "deneme1,kitap,defter"
gelenveriParcala = Split(gelenveri,",")
gelenveriAdeti = Ubound(gelenveriParcala)
  for i = 0 to gelenveriAdeti
    Response.Write gelenveriParcala(i) &"
"
  next

Split i kullanabileceğimiz oldukça fazla yer var. Örneğin selectbox (açılır menü)  ile veri göndereceğimiz zaman value sine sadece bir değer atayabiliriz. Mesala value=”deneme,dede,börtü,böcek” gibi.. Ben örneklerde , kullandım illa virgül kullanacaksınız diye bir şart yok. a karakteride olur / karakteride olur ne isterseniz onu kullanabilirsiniz. Başka bir yazıda görüşmek üzere hoşçakalın..

Değişkeni değişkenle tanımlamak (Redim)

Zaman zaman değişkenleri değişkenlerle tanımlamak gerekebilir. Hatta çoğu zaman bana göre çok büyük karmaşıklıkları önleyebilir. Bu işlem için imdadımıza Redim yetişiyor. Buyrun kodlar..

for i = 1 to 6
	redim degisken(i)
		degisken(i)=i
			Response.Write degisken(i)
next
tehlikelidir uyarıyorum :)
Response.Write faktorbul (5)
Function faktorbul ( sayi )
 If sayi <= 1 Then
      faktorbul = 1
   Else
       faktorbul = sayi * faktorbul ( sayi - 1 )
 End If
End Function

Emre Tekelioğlu

ASP İle Gün, Saat, Dakika, Saniye olarak Geri Sayma..

Varilacak zamana Gün, Saat, Dakika, Saniye cinsinden ne kadar zaman kaldigini bulabilirsiniz. Ekrana çiktisi 14 Gün 1789 S. 42 Dk. 46 Sn. Kaldi seklindedir.

tarihsaat = Cdate(”31.10.2008 12:12:12″) ‘ Varilacak zaman..
saniye=DateDiff(”s” ,now,tarihsaat)
kalansaniye=saniye Mod 60
dakika = Int(saniye/60)
kalandakika=dakika Mod 60
saat=Int(dakika/60)<
kalansaat=saat  Mod 24
kalangun=Int(saat/24)
kalanzaman=”"&kalangun&” Gün “&kalansaat&” S. “&kalandakika&” Dk. “&kalansaniye&” Sn.”
Response.Write kalanzaman