Access Tablodaki Alanı Toplayıp Tarih Vermek.

1 2
06/04/2021, 19:09

isouysal

Yine takıldım yardımınıza ihtiyacım var.
Örnek tabloda Posa Miktarının toplamı 500 kg aştığında tarihin bir artırılmasını istiyorum.
Şöyleki ilk 500 kg tarihi bugün ikinci 500 kg tarihi yarın (6.04.2021 ve 7.04.2021 gibi)
Yardımlarınız için teşekkür ederim.
06/04/2021, 21:25

berduş

tam olarak anlamadım
1- rs(11) neyi ifade ediyor tablonuzda topu topu 6 alan var en fazla rs(5) olur
2 - diyelim 800 kilo var 2 kayıt mı eklenecek biri bir gün sonraya diğeri 2 gün sonraya mı
06/04/2021, 22:03

isouysal

Sayın berduş bey;size Excel örnegini göderiyorum.İncelerseniz sevinirim.
rs(11) gelince tabloda fazla sutun vardı silmiştim.kod bölümünde silmeyi unutmuşum. özürümü maruz görün.
06/04/2021, 22:10

berduş

Peki rs(11) Access tablosundaki hangi alana denk geliyor
06/04/2021, 23:05

isouysal

Hocam rs(11)diye bir alan yok.O kodları silmeyi unutmuştum.Ben bu tabloya göre yeni kodla yazılmasını istiyorum.Çok uğraştım yapamadım.O kodları dikkate almayın. Orası posa bölmeyle ilgiliydi.
06/04/2021, 23:56

berduş

gönderdiğiniz Excel dosyasında posa sütununda hiç bir değer 500kgma yaklaşmıyor bile en fazla 70 var
Kota Ton olarak alayım dedim onda da miktar ile eklenmesi gereken gün arasında ilişki yok
mesela 212103-11 AHMET ALTINBAŞ 05-Nis-21 50 2300 07-Nis-21 kaydı için
posa=50
kota ton=2300
tarih=7 nisan
bu 7 nisan tarihi neye göre bulunmuş anlamadım ama dilerim aşağıdaki kod işinize yarar
Set rs = CurrentDb.OpenRecordset("Posa Kartları", dbOpenDynaset)
With rs
Do Until rs.EOF
TrhHesap = Fix((rs(3) - 1) / Me.Metin36) + CLng(Me.Metin33)
.Edit
rs(5) = TrhHesap
.Update
.MoveNext
Loop
End With
MsgBox "Posa Bölme İşlemi Tamamlanmıştır."
rs.Close
1 2