Access SQL
Kayıtlar Arası Gezinti Tuşlarının Iptali Hk. - Yazdırılabilir Sürüm

+- Access SQL (https://www.access-sql.com)
+-- Forum: ACCESS SORULARI VE ÖRNEK UYGULAMALARI (https://www.access-sql.com/Forum-ACCESS-SORULARI-VE-ORNEK-UYGULAMALARI)
+--- Forum: ACCESS SORULARI (https://www.access-sql.com/Forum-ACCESS-SORULARI)
+--- Konu: Kayıtlar Arası Gezinti Tuşlarının Iptali Hk. (/Konu-Kayitlar-Arasi-Gezinti-Tuslarinin-Iptali-Hk)



Kayıtlar Arası Gezinti Tuşlarının İptali Hk. - adnnfrm - 01-10-2022

Merhaba Arkadaşlar;


Formda kayıtlar arası gezinti işleminin sadece arama listbox u üzerinden yapılmasını istiyorum. End, home, pageup, pagedown gibi tüm kayıt gezintisinde kullanılabilecek tuşlarla gezinti yapılmasın istiyorum. Ama bu tuşları form içinde bir textbox içinde kullanılabilir. Örneğin veir satırının sonuna gitmek için end tuşuna basılması gerekebilir. Burada kullanılsın ama kayıt gezintisinde kullanılmasın istiyorum, nasıl yapabilirim.

Saygılarımla


RE: Kayıtlar Arası Gezinti Tuşlarının İptali Hk. - alperalper - 01-10-2022

(01-10-2022, 00:36)adnnfrm demiş ki: Merhaba Arkadaşlar;


Formda kayıtlar arası gezinti işleminin sadece arama listbox u üzerinden yapılmasını istiyorum. End, home, pageup, pagedown gibi tüm kayıt gezintisinde kullanılabilecek tuşlarla gezinti yapılmasın istiyorum. Ama bu tuşları form içinde bir textbox içinde kullanılabilir. Örneğin veir satırının sonuna gitmek için end tuşuna basılması gerekebilir. Burada kullanılsın ama kayıt gezintisinde kullanılmasın istiyorum, nasıl yapabilirim.

Saygılarımla

Ben formların kayıt kaynağını kullanmak yerine dao ile ilgili veriyi bulup getirmeyi tercih ediyorum. Böylece kayıtlar arası gezinti veya yanlış işlemlerin önüne geçmiş oluyorum.

Visual Basic
  1. Dim db As DAO.Database
  2. Dim rst As DAO.Recordset
  3. Set db = CurrentDb
  4. Set rst = db.OpenRecordset("TabloAdı" , dbOpenDynaset
  5.  
  6. With rst
  7. .FindFirst "CategoryName = " & "'better software'"
  8. If .NoMatch Then
  9.  
  10.  
  11. End If
  12. End With
  13.  
  14. Set rst = Nothing
  15. db.Close
  16. Set db = Nothing