Invalid Use Of Null Hatası Ve Işlemeyen If Else Bloku
#1
merhaba arkadaşlar bu hatayı alıyorum Dlookup fonksiyonumda , her şey gayet iyi gidiyordu burada takıldım, yardımcı olursanız çok sevinirim, dosya ekte. ayrıca ilk baştaki if else koşulum işlemiyor, metin kutularının boş olup olmamasını denetlemiyor, oraya da bi bakabilir misiniz?


Eklenti Dosyaları
.rar   genelButceSQL.rar (Boyut: 58,48 KB / İndirilme: 33)



  Alıntı
Bu mesajı beğenenler:
#2
Yeterli açıklama yapmamışsınız, hatayı hangi formda nerede alıyorsunuz. belirttiğiniz DLookup linki hata veriyor.



  Alıntı
Bu mesajı beğenenler:
#3
tabiki, kusura bakmayın, "sınıflar" adlı formda "kaydet" butonu olayları... kaydete basar basmaz tüm denetimleri kontrol etmesi, eğer boş olan varsa uyarı vermesi lazım, ayrıyeten  aşağıda kırmızı yazılı dlookup ta hata veriyor kaydet e bastığımda. aslında o dlookup fonksiyonum iş görüyor ama depo adlı metinkutusu boş olunca, hata veriyor

a = DLookup("Kimlik", "firmalar", "firmaAdi='" & Me.acilanFirmaAdi.Column(1) & "'")
b = DLookup("Kimlik", "alimTuru", "alimTuru='" & Me.acilanAlimTuru.Column(1) & "'")
c = DLookup("Kimlik", "isinTuru", "isinTuru='" & Me.acilanIsinTuru.Column(1) & "'")
d = DLookup("Kimlik", "siniflar", "sinifAdi='" & Me.acilan.Column(1) & "'")
e = DLookup("Kimlik", "depo", "depo='" & dep & "'")



  Alıntı
Bu mesajı beğenenler:
#4
Alanlarınızın tam boşluk kontrolü için,
Visual Basic
  1. If IsNull(Me.acilan) Or IsNull(Me.acilanAlimTuru)......


bu şekilde kullanın.
eklemiş olduğunuz uygulamadaki kod ile yukarıda vermiş olduğubnuz kod farklı (kırmızı olan)

Uygulamada;
Visual Basic
  1. e = DLookup("Kimlik", "depo", "depo='" & Me.depo & "'")


bu şekilde,
yukarıdaki kodunuz;
Visual Basic
  1. e = DLookup("Kimlik", "depo", "depo='" & dep & "'")


bu şekilde...



  Alıntı
Bu mesajı beğenenler:
#5
evet farklı çünkü denemeler yapım, ya çok teşekkür ederim de isnull olayı tamam ama hata veren dlookup işini nasıl yapayım onu anlamadım



  Alıntı
Bu mesajı beğenenler:
#6
Depo kısmında boş olduğunda hata veriyor demişsiniz, o zaman Nz fonksiyonu ile kullanabilirsiniz. Şu şekilde;
Visual Basic
  1. e = Nz(DLookup("Kimlik", "depo", "depo='" & Me.depo & "'"), "")


sondaki çift tırnak depo boş olduğunda yazılacak değerdir. Boşluk kaydetmesi için yukarıdaki gibi yazın. Başka bir değer yazdırmak için aşağıdaki örnek kullanılabilir.

Visual Basic
  1. e = Nz(DLookup("Kimlik", "depo", "depo='" & Me.depo & "'"), "YOK")


Nz ile ayrıntılı açıklama isterseniz buraya göz atabilirsiniz.
IsNull ile ayrıntılı açıklama isterseniz buraya göz atabilirsiniz.

Kodlarınızda değişkenlerinizi tam olarak tanımladığınızdan emin olmak için kodlarınızın başında bulunan,
Visual Basic
  1. Option Compare Database


deyiminden sonra, alt satıra,
Visual Basic
  1. Option Explicit



deyimini ekleyin.



  Alıntı
Bu mesajı beğenenler: tarkanaykın


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Ana Form Ve Alt Formdaki Checkbox'lı Alanlardaki Verileri Buton Ile Null Yapmak. M_Kemal_Askeri 1 31 7 saat önce
Son Mesaj: dsezgin
  [SORGU] ııf Ve ıs Not Null Birlkite Kullanımı Samih KARSLI 11 984 05-12-2023, 12:14
Son Mesaj: halily
  [VBA] Listbox Invalid Use Of Null Hatası benuva 3 462 17-08-2022, 20:31
Son Mesaj: benuva
  Geçerlilik Kuralı Hatası (check Hatası) adnnfrm 5 1.056 24-03-2021, 21:38
Son Mesaj: halily
  Bir Değişkene Null Değeri Atama tarkanaykın 2 674 14-10-2020, 18:12
Son Mesaj: tarkanaykın
  MS Access 1 kaydı anahtar hatası yüzünden tabloya ekleyemiyor" hatası Access70 2 984 24-05-2020, 18:18
Son Mesaj: Access70
  [TABLO] Excell'den access'e veri aktarma hatası ( Number formatı veri hatası) akkana 3 2.220 08-01-2019, 16:45
Son Mesaj: halily
  [SORGU] Sorguda Null Durumu fatihsipahi 3 998 08-10-2018, 12:50
Son Mesaj: celalll

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi