Resmini eklediğim hatayı veriyor
(22/01/2020, 17:35)berduş yazdı: hata benim dosyamda mı?
çünkü şimdi denedim sorun çıkmadı
eğitim tablosunu boşalttınız mı?
siz dolu tabloya eklemeye çalıştıysanız recortset boş değer döndüreceğinden hata verir.
o satırın üstüne
If OgRS.RecordCount = 0 Then
MsgBox "Tüm kişiler eğitim programına alındı"
Exit Sub
End If kodlarını ekleyerek deneyebilirsiniz.
If OgRS.RecordCount = 0 Then 'eklendi
MsgBox "Tüm kişiler eğitim programına alındı" 'eklendi
Exit Sub 'eklendi
End If 'eklendi
OgRS.MoveLast
OgRS.MoveFirst
(22/01/2020, 17:34)accessman yazdı: kotam dolduğu için ekleyememiştim ama kodları eklemiştim tekrar çok teşekkürler
hata resimlerini ekledim
dosyayı eklerken eğitim tablosunu çıkarmayabilirdiniz yada dosya yükleme sitelerine yükleyip bağlantıyı burada paylaşabilirdiniz
Alttakiler gereksiz gibi.
Düzeltme:Gerek varmış silince dosya kapandı.
Kod:
OgRS.MoveLast
OgRS.MoveFirst
Movefirst ve movelast gerçek kayıt sayısını bulmak için kullanılan ek bir önlem sadece
Olmazlarsa kapanma gibi bir sorun çıkmaması lazım, sadece hata uyarısı verir.
(22/01/2020, 19:58)berduş yazdı: Movefirst ve movelast gerçek kayıt sayısını bulmak için kullanılan ek bir önlem sadece
Olmazlarsa sorun çıkmaması lazım.
Normaldede sorun olmamalı lakin yolladığınız dosyada o kodları silince
Access kapandı.