AccessTr.neT
Dlookup Neresinde Hata Yapıyorum. - 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 Neresinde Hata Yapıyorum. (/konu-dlookup-neresinde-hata-yapiyorum.html)

Sayfalar: 1 2 3


Cvp: Dlookup Neresinde Hata Yapıyorum. - ozanakkaya - 19/03/2018

Private Sub Yap_is_AfterUpdate()

If [Forms]![Tablo1]![Per_Ad] <> "ÖZEL LAB." Then

Me.Say = Dlookup ("Kimlik", "is", "[is]='" & [Yap_is] & "'")

Else

       If Me.Yap_is = "RPT ÜT" Or Me.Yap_is = "RPT AT" Or Me.Yap_is = "RPT ÜP" Then

           Me.Say = 0
       
       Else

           Me.Say = Dlookup ("Kimlik", "is", "[is]='" & [Yap_is] & "'") * -1
       
       End If


End If


End Sub


koda sadece "RPT ÜT","RPT AT","RPT ÜP" değerleri eklendi. Diğerlerini kendiniz eklersiniz.


Cvp: Dlookup Neresinde Hata Yapıyorum. - hegu - 19/03/2018

emeğine sağlık teşekkür ederim.