AccessTr.neTAccessTr.neT GenelÇöp Kutusu

Rapor Açılımda Dlookup Kullanımı

07/10/2023, 16:52

truhi

Merhaba,
Ekkli veritabanına Form üzerinde aktik kayıttan Rapor açılırken;
Rapora bazı verileri Dlookup ile getirmek istediğimde;

hangi kimlik numarasına ait kayıtı açmak istesemde her durumda birinci sıradaki verileri getiriyor,

benim istediğim ilgili kimlik numarasına dair bilgilerin gelmesi;

bu konuda nasıl bir çözüm yolu önerirsiniz?

desteğiniz için şimdiden teşekkürler,
iyi hafta sonları....

Kod:
Private Sub Report_Load()

Dim kim, d1, d2, d3, d4, d5, d6

kim = Me.Kimlik

MsgBox kim


d1 = DLookup("[ANK]", "Plan", [Kimlik] = kim)
d2 = DLookup("[İZM]", "Plan", [Kimlik] = kim)

d3 = DLookup("[KON]", "Plan", [Kimlik] = kim)
d4 = DLookup("[ESK]", "Plan", [Kimlik] = kim)

Me.txtANK = d1
Me.txtIZM = d2
Me.txtKON = d3
Me.txtESK = d4

End Sub
07/10/2023, 21:33

temre

Yapmak istediğiniz ekteki şekilde birşey midir?
07/10/2023, 23:42

truhi

(07/10/2023, 21:33)temre yazdı: Yapmak istediğiniz ekteki şekilde birşey midir?

Hocam iginize teşekkürler,
yalnız benim istediğim raporu bir tablo ile doğrudan ilişkelendirmeden çözüm üretmekti,

şöyle çıkan değeri değişik sayılarla ile çarparak çarparak getirmek.

Tablo ile doğrudan ilişkilendirildiği zaman bu ihtimal ortadan kalkıyor.

Kod:
Me.txtANK = d1 * 5
Me.txtIZM = d2 * 6
Me.txtKON = d3 * 12
Me.txtESK = d4 * 18
gibi...
iyi hafta sonları ..