28-01-2023, 02:44
Hocalarım merhaba,
yoklamadefteri adında tablom var. TCKimlik Ay ve Yıl süzgeç işlemi ile branşları sorgu yöntemi ile çağırıp ay yıl seçtikten sonra Yukle butonuna basıp listeyi ekrana getiriyorum. fakat Yukle butonuna tekrar bastığımda aynı isimleri mükerrer olarak yine getiriyor. ben enabled=false yöntemi ile aslında yukle butonunu pasif ediyorum ama bu seferde yeni eklenen kişiyi getirmediği için yukleye basmam gerekiyor.
benim istediğim yukleye ne kadar basarsam basayım benzersiz kayıt varsa gelsin ama mükerrer kayıt varsa gelmesin. bunu nasıl yapabilirim acaba.
Yukle Butonunda kullandığım komut şöyle;
Private Sub Yukle_Click()
Me.Yukle.Enabled = False
CurrentDb.Execute "INSERT INTO yoklamadefteri ( TCKimlik, AY, YIL ) " & _
"SELECT [öğrenci takip].Kimlik, '" & Me.AYa & "', '" & Me.YILa & "' FROM [öğrenci takip]"
Me.Requery
Call Suzgec
End Sub
yardımlarınızı beklerim.
yoklamadefteri adında tablom var. TCKimlik Ay ve Yıl süzgeç işlemi ile branşları sorgu yöntemi ile çağırıp ay yıl seçtikten sonra Yukle butonuna basıp listeyi ekrana getiriyorum. fakat Yukle butonuna tekrar bastığımda aynı isimleri mükerrer olarak yine getiriyor. ben enabled=false yöntemi ile aslında yukle butonunu pasif ediyorum ama bu seferde yeni eklenen kişiyi getirmediği için yukleye basmam gerekiyor.
benim istediğim yukleye ne kadar basarsam basayım benzersiz kayıt varsa gelsin ama mükerrer kayıt varsa gelmesin. bunu nasıl yapabilirim acaba.
Yukle Butonunda kullandığım komut şöyle;
Private Sub Yukle_Click()
Me.Yukle.Enabled = False
CurrentDb.Execute "INSERT INTO yoklamadefteri ( TCKimlik, AY, YIL ) " & _
"SELECT [öğrenci takip].Kimlik, '" & Me.AYa & "', '" & Me.YILa & "' FROM [öğrenci takip]"
Me.Requery
Call Suzgec
End Sub
yardımlarınızı beklerim.