AccessTr.neT

Tam Versiyon: Dosya Başı Ve Sonu İse Mesaj Versin
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
sayın hocalarım merhaba,

önceki ve sonraki tuş komutlarında önceki tuşa bastığımda eğer dosya başı ise mesaj versin,
sonraki tuşa bastığım da dosya sonu ise mesaj vermesini istedim ama yapamadım ve bulamadım da.

Saygılarımla,

Ahmet Yenginoğlu
ne tür bir dosyadan bahsediyorsunuz?
sürekli/süreksiz formdaki Access tablosu mu?
ilk kayıtsa
  If Me.Recordset.AbsolutePosition = 0 Then
son kayıtsa
 If Me.Recordset.AbsolutePosition = Me.Recordset.RecordCount -1 Then
yada
ilk kayıt değilse
 if Not (CurrentRecord = 1) Then
son kayıt değilse
 if Not (CurrentRecord = DCount("*", RecordSource)) Then
Hocam merhaba,

haklısınız hemen örnek ekliyorum.
Formdaki önceki ve sonraki tuşlarına basıldığında dosya başı veya dosya sonu ise mesaj versin.

Saygılarımla,
merhaba,

herhalde ben unutuldum.
Merhaba Sayın @yenginoglu

@berduş hocam size gerekli yol haritasını zaten vermiş
(15/06/2023, 21:01)berduş yazdı: [ -> ]ne tür bir dosyadan bahsediyorsunuz?
sürekli/süreksiz formdaki Access tablosu mu?
ilk kayıtsa
  If Me.Recordset.AbsolutePosition = 0 Then
son kayıtsa
 If Me.Recordset.AbsolutePosition = Me.Recordset.RecordCount -1 Then
yada
ilk kayıt değilse
 if Not (CurrentRecord = 1) Then
son kayıt değilse
 if Not (CurrentRecord = DCount("*", RecordSource)) Then

ilk kayıt ve son kayıt için 1. ve 2. kodu kullanabilir ve then kısmından sonra msgbox ile istediğiniz mesajı verebilirsiniz.
Sayın hocalarım,

çok teşekkür ederim. Sağlıkla kalın.


Saygılarımla,