AccessTr.neT
Dlookup fonksiyonunda kriter hatası - Baskı Önizleme

+- 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ığı: Dlookup fonksiyonunda kriter hatası (/konu-dlookup-fonksiyonunda-kriter-hatasi.html)

Sayfalar: 1 2


Cvp: Dlookup fonksiyonunda kriter hatası - derebeyi - 29/01/2011

Denemez olur muyum Ercan Hocam, bütün varyasyonları denedim. Bana mısın demiyor


Oktay Hocam sizin için 2003 yaptım Img-grin


Cvp: Dlookup fonksiyonunda kriter hatası - okileturc - 29/01/2011

sadece şunu deneyin
Varmi = Nz(DLookup("alttur_id", "T_ALTTUR", "[genturno]= [genturkutu] And [alttur] = [falttur] "), 0)
Çünkü hiç değişken yok gördüğüm kadarıyla
Hatta şunu
Varmi = Nz(DLookup("alttur_id", "T_ALTTUR", "[genturno]= [genturkutu] And [alttur] = [falttur] "))*1


Cvp: Dlookup fonksiyonunda kriter hatası - derebeyi - 29/01/2011

Oktay Hocam ;
Hata resimlerini ekledim.

[Resim: wa1xdg.jpg]

[Resim: 300el50.jpg]

Bu arada ek kod yazarak çözdüm ama mesele o değil.

Dim varmi As Integer
Dim bak1 As Integer
Dim bak2 As Integer

Dim sonkay As Integer
'mükerrer kayıt kontrolü
bak = Nz(DLookup("alttur_id", "T_ALTTUR", "genturno=" & [genturkutu]), 0)
bak1 = Nz(DLookup("alttur_id", "T_ALTTUR", "alttur = '" & [falttur] & "'"), 0)
If bak = 0 And bak1 = 0 Then
varmi = 0
Else
varmi = 1
End If

sonkay = Nz(DMax("alttur_id", "T_ALTTUR"), 0)
'alttür ismini ara ve id numarasını varmi değişenine ata
'en büyük id numarasını sonkay değişkenine ata
If varmi = 0 Then 'sonuç sıfırsa aynı isim yok demektir
[/quote]
Oktay Hocam;
Çok teşekkürler
Alıntı:Varmi = Nz(DLookup("alttur_id", "T_ALTTUR", "[genturno]= [genturkutu] And [alttur] = [falttur] "), 0)
Bu kod oldu. Sorun çıkarmadan yoluna devam etti. Sağolun.


Cvp: Dlookup fonksiyonunda kriter hatası - ercansahin - 29/01/2011

sizin eklediğiniz örneği görmedim (geç gördüm), oysaki ilk mesaja eklemişsiniz.Img-grin)) Oktay hocamada teşekkürler.