+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Gün gün otomatik kayıt açmak (/konu-gun-gun-otomatik-kayit-acmak.html)
Cvp: Gün gün otomatik kayıt açmak - kadirdursun - 14/04/2016
Yeni gerekli olan bir alan daha var.
Kayıt varmı kontrolünde NERDEN diye bir alanı daha kontrol ettirmek istiyorum. bunu aşağıdaki gibi ekledim. çalışmadı.
KayitVarMi = Nz(DLookup("GUNID", "T_GUNLER", "TARIH= #" & Format(GYemekTarihi, "mm\/dd\/yyyy") & "# And [PERSONELID]= " & rs2!PERSONEID & "" And [NERDEN] = " & rs2!NERDEN & """), 0)
Cvp: Gün gün otomatik kayıt açmak - atoz112 - 14/04/2016
sayın kadirdursun,
bahsettiğiniz talebinize yönelik olarak;
NERDEN adlı alanın Metin (String) veri türünde olsa gerek.bu nedenle ilgili kod satırını
Kod:
KayitVarMi =Nz(DLookup("GUNID", "T_GUNLER", "TARIH= #" & Format(GYemekTarihi, "mm\/dd\/yyyy") & "# And [PERSONELID]= " & rs2!PERSONEID & " And [NERDEN] ='" & rs2!NERDEN & "'"), 0)Hatırlatmak adına;
Metin (String) veri türündeki alanlar için kod satırlarında TEK TIRNAK (') işaretini eklemelisiniz.SAYI veri türündeki alanlar için bu tek tırnak ekleme işlemi olmayacak.
son olarak;
12.mesajda sayın ozan bey tarafından eklenen örnek uygulama konu başlığındaki sorunuzun çözümünü sağladıysa,lütfen bunu belirtiniz ki (her ne kadar 13.mesajda farklı bir duruma değinmeniz neticesinde bu çözümün sağlandığı anlaşılsa bile,sizin buradan talepte bulunmanız daha geçerli olacaktır),konunuzu Cevaplanmış Sorular kategorisi'ne taşınması sağlansın.teşekkürler.
bilginize...iyi çalışmalar,saygılar.
Cvp: Gün gün otomatik kayıt açmak - kadirdursun - 14/04/2016
Verdiğiniz kodu yazınca hata verdi. Örneğimi ekledim vaktiniz olunca ilgilenebilir misiniz?
Cvp: Gün gün otomatik kayıt açmak - atoz112 - 14/04/2016
sayın kadirdursun,
uygulamanız kısa süreli imkan dahilinde incelenmesi sonucunda,
bahsettiğiniz talebinize yönelik olarak;
Kod:
KayitVarMi = Nz(DLookup("GUNID", "T_GUNLER", "TARIH= #" & Format(GYemekTarihi, "mm\/dd\/yyyy") & "# And [PERSONELID]= " & rs2!PERSONEID & " And [NERDEN] ='" & rs2!NERDEN & "'"), 0)fakat,bu kodun dahil olduğu kod bloğunda IF Fonksiyonu satırında yazılı şart gerçekleşmediğinde ELSE olarak yapılacak işlemlerinde yazılması gerekmektedir ki şart uygun değilse bunlar da sağlanabilsin.
bilginize...iyi çalışmalar,saygılar
Cvp: Gün gün otomatik kayıt açmak - kadirdursun - 14/04/2016
"Öğe bu derlemede bulunamadı."
hatası verdi.
KayitVarMi = Nz(DLookup("GUNID", "T_GUNLER", "TARIH= #" & Format(GYemekTarihi, "mm\/dd\/yyyy") & "# And [PERSONELID]= " & rs2!PERSONEID & " And [NERDEN] ='" & rs2!NERDEN & "'"), 0)
Cvp: Gün gün otomatik kayıt açmak - atoz112 - 14/04/2016
sayın kadirdursun,
eğer tanımlı alan adlarında uyumsuzluk söz konusu ise (ya da mevcut olmama gibi),bu hatayı verebilir.
örneğin;
rs2!NERDEN gibi
kontrol etmek gerekmektedir.
bunun yerine bu kısmı
Kod:
And [NERDEN] ='" & "NORMAL & "'