S.a arkadaşlar.Bende ufaktan accessle bişeyler yapmaya çalışıyorum fakat cok zormuseklediğim programa giriş paneli eklemek istiyorum birde verilen yakıt formunda plakayı sectiğim zaman o aracın son girilen km ilk km olarak gösterme imkanı varmıdır.Şimdiden cok tesekkürler.

Merhaba, konu başlığınız ile sorduğunuz sorunun bağlantısını çözemedim.

Öncelikle Yapılmaması Gereken Ölümcül Hatalar konusunu inceleyiniz.

Formdaki TXTPLAKA açılan kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu ekleyiniz.

Dim GYakit As Integer



GYakit = Nz(DMax("[SON KM]", "VERİLEN_YAKIT", "[PLAKA]='" & Me.TXTPLAKA & "'"), 0)



If GYakit = 0 Then



GYakit = Dlookup ("[İLK KM]", "ARAÇ_TANIMLA", "[ID]=" & Me.TXTPLAKA)



End If



Me.TXTİLK = GYakit

Verilen yakıt tablosunda plakaya ait son veriyi aktarır, veri yok ise araç tanımlamadaki ilk km alanındaki veriyi aktarır.

Nesne isimlerinde ve alan isimlerinde Türkçe karakter ve boşluk kullanmamaya özen gösterinb.

merhaba ben düzenleme yapar iken ozan bey yazmış .
ufak bir düzenleme yapıldı.
inceleyiniz.

Çok tesekkürler ilgilinize Ozan bey .yalnız kayıt yaparken tablolarda plaka ıd olarak birincil anahtara verilen değer ile kaydoluyor onu nasıl plaka olarak görebilirim.

(28/03/2018, 15:54)salih demir yazdı: plaka ıd olarak birincil anahtara verilen değer ile kaydoluyor

Merhaba, bu şekilde doğru olanı yapmışsınız. Ancak verilen_yakit tablosundaki plaka alanının sayı olarak değiştirilmesi gerekli. Bu işlemi yaptıktan sonra

SELECT VERİLEN_YAKIT.TARİH, ARAÇ_TANIMLA.PLAKA, VERİLEN_YAKIT.[ARACI KULLANAN], VERİLEN_YAKIT.[YAKITI VEREN], VERİLEN_YAKIT.[İLK KM], VERİLEN_YAKIT.[SON KM], VERİLEN_YAKIT.[VERİLEN LT], VERİLEN_YAKIT.[YAPILAN KM], VERİLEN_YAKIT.[ORTALAMA TÜKETİM]

FROM ARAÇ_TANIMLA INNER JOIN VERİLEN_YAKIT ON ARAÇ_TANIMLA.ID = VERİLEN_YAKIT.PLAKA;

Sorgusu ile plaka id yerine plakayı görebilirsiniz.

Ozan bey affınıza sığınıyorum fakat bilmeyince zor oluyor yazdığınız kodu nerde sorgulamasını yapmam gerekiyor.