(27/04/2021, 16:19)berduş yazdı: dilerim işinize yararCok tesekkur ederim Halil Bey, Istedigimiz gibi olmus.
kayıt sidikten sonra çalışan kod
kayıt ekledikten sonra çalışan kodPrivate Sub Form_AfterDelConfirm(Status As Integer)
SqlGuncelle = "UPDATE Tbl_WH_Out_Det SET Tbl_WH_Out_Det.Mat_Queue_No = DCount('*','[Tbl_WH_Out_Det]','[WHOMRI]=' & [WHOMRI] & ' and [WHORI]<=' & [WHORI])" & _
"WHERE ((Tbl_WH_Out_Det.WHOMRI)=" & Me.WHOMRI & ");"
CurrentDb.Execute SqlGuncelle
me.requery '<==çalışmada eklenmemiş kod
End Sub
Private Sub Form_AfterInsert()
SqlGuncelle = "UPDATE Tbl_WH_Out_Det SET Tbl_WH_Out_Det.Mat_Queue_No = DCount('*','[Tbl_WH_Out_Det]','[WHOMRI]=' & [WHOMRI] & ' and [WHORI]<=' & [WHORI])" & _
"WHERE ((Tbl_WH_Out_Det.WHOMRI)=" & Me.WHOMRI & ");"
CurrentDb.Execute SqlGuncelle
End Sub
silme ya da ekleme işleminden sonra F5 yaparsanız anında günceller
yada yukardaki kodlar me.requery eklenebilir
Daha once ki mesajlarimda da belirtttigim alt forma focuslanma ile ilgili yardimci olabilrmisiniz. Yada bir baska arkadas yardimci olabilir mi.
Herkese Saygilar,