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

#14
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
.rar TC_WHP_Accesstr_hy.rar (Dosya Boyutu: 564,15 KB | İndirme Sayısı: 6)
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: berduş - 27/04/2021, 16:19
Task