1. Sorunuz ile ilgili olarak,

Müşteri bilgileri Musteri tablosunda yazılı olduğundan Degisim tablosunda müşteri adı yerine IDMusteri değerinin yazması daha doğru olacaktır.

MusteriAdi açılan kutusunun ilişkili sütun değerini 2 olarak değiştir.



aynı açılan kutunun güncelleştirme sonrasında olayına yazılı kodu aşağıdaki ile değiştir.

EskiUrun = Dlookup ("[Urun]", "[Musteri]", "[IDMusteri] =" & Me.MusteriAdi.Column(0))

Sil butonunda problem var, aşağıdaki ile değiştirilmesi gerekli,

If MsgBox(" KAYIT SİLİNİYOR !!!", 52, "Silme İşlemi") = vbYes Then



    DoCmd.SetWarnings False

    DoCmd.RunSQL "DELETE IDDegisim, * FROM Degisim WHERE (((IDDegisim)=[Forms]![FormDegisim]![IDDegisim]));"

    DoCmd.SetWarnings True



Me.DegisimListe.Requery

 

Call FormKapali

Me.Vazgec.SetFocus

Me.Yeni.Enabled = True

Me.Kaydet.Enabled = False

Me.Guncelle.Enabled = False

Me.Sil.Enabled = False

Me.Guncelle.Enabled = False



Me.IDDegisim = Null

Me.MusteriAdi = Null

Me.EskiUrun = Null

Me.YeniUrun = Null

MsgBox "Kayıt Silinmiştir.", 64, "Silme İşlemi"



Else

MsgBox "Kayıt Silme İşleminden Vazgeçtiniz.", 64, "Silme İşlemi"

End If

2. sorunuz için;

Müşteri adına doğrusu olan id numarasını mı yazdıracaksınız, yoksa yukarıdaki kodu kullanıp hatayı gidererek yanlışa devam mı edeceksiniz karar verin, kararınıza göre 2. soru için yeni konu açın yardımcı olmaya çalışalım.