Skip to main content

AccessTr.neT


Sonraki Kayda Git Butonu Yeni Kayda Gitmsin

Sonraki Kayda Git Butonu Yeni Kayda Gitmsin

Çözüldü #1
Arkadaşlar merhaba,
Sonraki kayda git butonunun  yeni kayda gitmsini nasıl önleyebiliriz ?
edacan19, 17-04-2010 tarihinden beri AccessTr.neT
Cevapla
#2
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
Cevapla
#3
If Recordset.AbsolutePosition < Recordset.RecordCount - 1 Then  DoCmd.GoToRecord , , acNext
Cevapla
#4
Sorun çözüldü çok teşekkür ediyorum.
edacan19, 17-04-2010 tarihinden beri AccessTr.neT
Cevapla
#5
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
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task