GİRİŞ

Access ile hazırladığımız uygulamalarımızda yapmak istediklerimiz arttıkça artık menülerin, sihirbazların, makroların yetersiz kaldığını hissederiz.. Ama biz uygulamalarımızın daha özgün, esnek ve de kullanışlı olmasını istiyoruz.. Bu da demektir ki artık ufak ufak kod yazmayı öğrenmenin zamanı gelmiştir..




Merhaba arkadaşlar..

İf - Then - Else karar yapısı en sık kullandığımız yapılardan biridir.. Oldukça esnek ve ku

GİRİŞ

Access ile hazırladığımız uygulamalarımızda yapmak istediklerimiz arttıkça artık menülerin, sihirbazların, makroların yetersiz kaldığını hissederiz.. Ama biz uygulamalarımızın daha özgün, esnek ve de kullanışlı olmasını istiyoruz.. Bu da demektir ki artık ufak ufak kod yazmayı öğrenmenin zamanı gelmiştir..




Merhaba arkadaşlar..

Select Case karar yapısı bir önceki konuda işlediğimiz İf - Then - Else karar yapısının (öz

1- ) KARAR YAPILARI:

a - ) CASE…END Karar Yapısı (Standart SQL):

İki tür kullanım şekli vardır. Örnekler ile açıklamaya çalışayım.

“OGRENCI_LISTESİ” tablosu olduğunu, bu tablonun “OGRENCI_NO” ve “OGR_NOTU” sütunları
olduğunu varsayalım.

Örnek Kullanım 1:

[code=sql]SELECT
OGR_NO,
OGR_NOTU,
CASE OGR_NOTU
/* Yalnızca OGR_NOTU belli değerlere eşit olursa */
W

Köyün birinde bir yaşlı adam varmış. Çok fakirmiş ama Kral bile onu kıskanırmış...Öyle dillere destan bir beyaz atı varmış ki, Kral bu at için ihtiyara nerdeyse hazinesinin tamamını teklif etmiş ama adam satmaya yanaşmamış.. "Bu at, bir at değil benim için; bir dost, insan dostunu satar mı" dermiş hep. Bir sabah kalkmışlar ki,at yok. Köylü ihtiyarın başına toplanmış: "Seni ihtiyar bunak, bu atı sana bırakmayacakları, çalacakları belliydi.Krala satsaydın, ömrünün sonuna kadar beyler gibi yaşardın

Bir arkadaşımızın isteği üzerine düzenlediğim, toplantı kararlarında kullanılabilecek küçük bir uygulama...

Ekteki veritabanı bir önceki konu ile bağlantılı işleyiş aynı ancak yapılan kayıtların mükerrerliğinide kontrol etmek gerekiyor aksi halde her butona basıldığında aynı kaydı ekleyeceğinden karışıklık olacaktır.SNT_GIRIS formunda ODE butonuna bağlı çalışan kod
aşağıdaki gibi bu işlemden önce mükerrer kayıt kontrolü yaptırmam gerek kayıt varsa işlem durmalı yoksa yeni kayııt eklenmeli.

[code=vba]Private Sub ODE_Click()
Select Case Me.ODEMESEKLI.Column(0)
Case "1"
If MsgBox("kasaya tahsila

Merhabalar,

Şirketinizde disiplin yönetmeliğini ihlal eden için disiplin kurulu adına alınan kararların kayıt edildiği ve yönetildiği bir çalışma yaptım. Bizim de aktif olarak kullandığımız uygulamayı kullanmak isteyenlerin istifadesine sunuyorum.