S.a arkadaşlar.Bende ufaktan accessle bişeyler yapmaya çalışıyorum fakat cok zormus
eklediğ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
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.