Kayıt Varsa Güncelle, Yoksa Ekle

Bu konuda yardımcı olabilir misiniz?

If DCount("ders_ter_id", "tbl_dersyuku_alt", "[is_id]=" & is_id) > 0 Then

DoCmd.SetWarnings False

DoCmd.RunSQL "UPDATE tbl_dersyuku_alt set tbl_dersyuku_alt.ogrtsay=" & Gogrtsay & ",tbl_dersyuku_alt.alansef=" & Galansef & ",tbl_dersyuku_alt.atlsef = " & Gatlsef & ",tbl_dersyuku_alt.ibe = " & Gisletme & ",tbl_dersyuku_alt.ddh = " & Gddh & ",tbl_dersyuku_alt.dersyükü = " & Gfiilidersyk & ",tbl_dersyuku_alt.ogrfiilidersyk = " & Gogrtfiili & ",tbl_dersyuku_alt.ogrtplmdrsyk = " & Gogrtplyk & ",tbl_dersyuku_alt.tpldersyk = " & Gtoplamdersyk & " WHERE  tbl_dersyuku_alt.[is_id]=" & is_id

DoCmd.SetWarnings True

Else

DoCmd.SetWarnings False



DoCmd.RunSQL "insert into tbl_dersyuku_alt(ogrtsay,alansef,atlsef,ibe,ddh,dersyükü,ogrfiilidersyk,ogrtplmdrsyk,tpldersyk,is_id)values (" & Gogrtsay & "," & Galansef & "," & Gatlsef & "," & Gisletme & "," & Gddh & "," & Gfiilidersyk & "," & Gogrtfiili & "," & Gogrtplyk & "," & Gtoplamdersyk & "," & is_id & ")"

DoCmd.SetWarnings True



End If

https://resimyukle.org/i/B8KYy

Yukarıdaki kodda nerde hata var. Tabloya boş satır ekliyor. Yapması gereken şek; aynı iş türü daha önceden eklendiyse kaydı güncelleyecek, yoksa yeni kayıt açacak.

?????????

Şu sıralar bilgisayar olmadığı için doğrudan sorun ne bilemiyorum ama aşağıdaki adımları takip ederek sorunu saptayabilirsiniz? Her adımı diğer kodlar olmadan sadece ilgili kodu yazarak deneyin ama en başta ilgili metin kutularinin değerinin doğru alınıp alınmadığını kontol edin
1 - DCount kısmi doğru çalışıyor mu? Mesela sadece DCount için
Msgbox dcount..... kodunu yazıp deneyin dcountlarin sonucu doğru mu?
2 - eğer DCount sonucu doğru ise if kısmını kontrol edin
If dcount>0 then
Msgbox dcount.... & " büyük "
Else
Msgbox ....
End if
gibi
3 - var olduğunu bildiğiniz bir kayıt için güncelleme kodunuzu deneyin
Önce verileri doğrudan koda ekleyerek sonra metin kutularından çekerek
4 - olmadığını bildiğiniz bir değer için ekleme kodunu deneyin
Önce verileri doğrudan koda ekleyerek sonra metin kutularından çekerek

kodlar çalışıyor. ama tabloya aynı iş için iki satırı neden atıyor.onu çözemedim

Çok inceleyemedim o nedenle hatalı olabilirim ama altformu neden tabloya bağladınız? Her koşulda öğretmen sayısı değeri 0 geliyor. Tabloya bağlamadan yapmayı dener misiniz?