AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

Sonraki Kayda Git Butonu Yeni Kayda Gitmsin

27/05/2019, 11:21

edacan19

Arkadaşlar merhaba,
Sonraki kayda git butonunun  yeni kayda gitmsini nasıl önleyebiliriz ?
27/05/2019, 11:32

ozanakkaya

Sonraki kayda git butonunu kodunu aşağıdaki ile değiştirerek deneyiniz


DoCmd.GoToRecord , , acNext



If Me.NewRecord Then

  DoCmd.RunCommand acCmdRecordsGoToLast

End If
27/05/2019, 11:40

berduş

If Recordset.AbsolutePosition < Recordset.RecordCount - 1 Then  DoCmd.GoToRecord , , acNext
27/05/2019, 13:23

edacan19

Sorun çözüldü çok teşekkür ediyorum.
03/06/2019, 12:10

okumas

Buda uyarı verdirerek bilgilendirebilirsiniz
Private Sub Komut51_Click()

If Not (CurrentRecord = DCount("Kimlik", "Demirbaş listesi")) Then

DoCmd.GoToRecord , , acNext

Else

MsgBox "Son kayıttasınız", vbInformation, "SON KAYIT BİLDİRİMİ"

Exit Sub

End If

End Sub