Skip to main content

AccessTr.neT


Formdaki Rownum([Form]) İle Ekrana Gelen Sıra Noyu Tabloya Yazdırmak

Formdaki Rownum([Form]) İle Ekrana Gelen Sıra Noyu Tabloya Yazdırmak

#15
(27/04/2021, 16:19)berduş yazdı: dilerim işinize yarar
kayıt sidikten sonra çalışan kod
Private 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
kayıt ekledikten sonra çalışan kod

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
Cok tesekkur ederim Halil Bey, Istedigimiz gibi olmus.
Daha once ki mesajlarimda da belirtttigim alt forma focuslanma ile ilgili yardimci olabilrmisiniz. Yada bir baska arkadas yardimci olabilir mi.

Herkese Saygilar,
İrtifâ-ı kadr için tevâzu lazım Âdem'e, Şemsi gör kim sâyesin salmış ayaklar altına. Hersekli Arif Hikmet

Subco, 09-04-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
RE: Formdaki Rownum([Form]) İle Ekrana Gelen Sıra Noyu Tabloya Yazdırmak - Yazar: Subco - 28/04/2021, 09:27
Task