AccessTr.neT

Merhabalar.Ekteki uygulamada verisayfası görünümündeki alanda elle girdiğim numaranın satırbaşlarına geldiğimde otomatik artmasını istiyorum. Tablodan Alan özelliğini otomatik sayı yaptığımda her açılan formda sıra numarası kaldığı yerden devam ediyor. Ben her formun sıra numarasının otomatik olarak elle girmeye gerek kalmadan 1 den başlatmak istiyorum. Raporda formdaki gibi genel toplam göstermeyi beceremedim. Nasıl yapılabilir. Teşekkürler.

(30/11/2018, 00:27)Oğuz Türkyılmaz yazdı: [ -> ]her formun sıra numarasının otomatik olarak elle girmeye gerek kalmadan 1 den başlatmak istiyorum

Form üzerinden girince s_no'yu kendi otomatik ekliyor 

(30/11/2018, 00:27)Oğuz Türkyılmaz yazdı: [ -> ]Raporda formdaki gibi genel toplam göstermeyi nasıl yapılabilir.

raporda alt toplam da gösteriyor
dilerim işinize yarar

Halil Bey Aşağıdaki hatayı veriyor 

1.resim tedarikçi firmayı yazdıktan sonra enter yapıp alt formun içine girmeye çalıştığımda oluştu
2.resim alt forma manuel elden direk sıra numarasına girip enter dediğimde oluştu. 

eğer sizin veritabnınız yüklediğiniz ile aynı ise, yapısal bir fark yoksa
1. s_no zaten otomatik oluşuyor sizin eklemenize gerek yok oraya veri girmeye çalıştığınız için olabilir ama ben veri girmeye çalıştığımda bambaşka bir uyarı verdi. s_no alanına girişi engellemek için :
tasarım modunda altformdaki  S_No txt kutusunu kilitleyin ve setfocus özelliğini pasifleştirin.
2. olarak bahsettiğiniz uyarı tekrarı engellemek için oluşturulan benzersiz alanlara aynı veriyi tekrar girmek istediğinizde çıkar
aynı kaydı tekrar girmeye çalışmış olmalısınız
Düzenleme: sizin girdiğiniz verilerin aynısını girdim, enter yapıp altforma girdim ama uyarı vermedi

yalnız "F_02_TeklifDetayAltForm" da S_Noyu hesaplarken kullandığım Dmax komutunu değiştirmek gerek
dmax boş ise sorun çıktığından Nz(DMax(………...…)) şeklinde olmalı
o formdaki kodu 
__________________________________________________________________________
Private Sub Form_BeforeUpdate(Cancel As Integer)

Me.S_No = DMax("S_No", "T_02_TeklifDetay", "TeklifVerilenFirma='" & _

             Me.TeklifVerilenFirma & "'") + 1
End Sub
___________________________________________________________________________

aşağıdaki ile değiştirin

Private Sub Form_BeforeUpdate(Cancel As Integer)

Me.S_No = Nz(DMax("S_No", "T_02_TeklifDetay", "TeklifVerilenFirma='" & _

             Me.TeklifVerilenFirma & "'")) + 1

End Sub

(30/11/2018, 08:51)haliliyas yazdı: [ -> ]eğer sizin veritabnınız yüklediğiniz ile aynı ise, yapısal bir fark yoksa
1. s_no zaten otomatik oluşuyor sizin eklemenize gerek yok oraya veri girmeye çalıştığınız için olabilir ama ben veri girmeye çalıştığımda bambaşka bir uyarı verdi. s_no alanına girişi engellemek için :
tasarım modunda altformdaki  S_No txt kutusunu kilitleyin ve setfocus özelliğini pasifleştirin.
2. olarak bahsettiğiniz uyarı tekrarı engellemek için oluşturulan benzersiz alanlara aynı veriyi tekrar girmek istediğinizde çıkar
aynı kaydı tekrar girmeye çalışmış olmalısınız
Düzenleme: sizin girdiğiniz verilerin aynısını girdim, enter yapıp altforma girdim ama uyarı vermedi

Sıra noya manuel olarak girmeye çalışmadan birinci resimdeki hatayı alınca dur bakayım içine girince devam edecekmi diyerek direk manuel marka kutucuğuna girdim veri girip enter dediğimde 2.resimdeki hata çıktı. Yapmamı söylediğiniz değişiklikleri yapıp hemen geri bildirimde bulunacağım. Teşekkür ederim.