Kayıt Ekle Butonu

16/12/2022, 10:29

Sümeyye_

Merhabalar
1-cboMachineName ve cboCurrentUsers değer seçilirken  Kayıt ekle butonuna tıklayınca sıfırlanmıyor.
2-Eklenen kaydı MachineName numarasına göre sıralamak istiyorum.
Örneğin ilk MachineName numaram A43569236556 bu.
ben ise A43569236557 kaydını yeni eklemek istiyorum.
Kaydın sona değil sırasına göre eklemek istiyorum
3-cboMachineName'e aramak için bir değer yazınca enter a basınca "Böyle bir kayıt yok" diye uyarı mesajı vermek istiyorum.
17/12/2022, 16:07

berduş

(16/12/2022, 10:29)Sümeyye_ yazdı: 1-cboMachineName ve cboCurrentUsers değer seçilirken  Kayıt ekle butonuna tıklayınca sıfırlanmıyor.
o 2 alan ilişkisiz olduğu için silinmiyor makro yerine yeni kayda gitme kodunu eklerseniz o koda ekleyeceğiniz yeni kodlarla ilgili alanlar sıfırlanabilir
Me.cboMachineName = Null
Me.cboCurrentUsers = Null
DoCmd.GoToRecord , , acNewRec

(16/12/2022, 10:29)Sümeyye_ yazdı: 2-Eklenen kaydı MachineName numarasına göre sıralamak istiyorum.
bildiğim kadarıyla kayıt her zaman en sona eklenir ama siz verilerle işlem yaparken order by kodunu kullanarak kayıtları istediğiniz sıraya göre çağırabilirsiniz
17/12/2022, 16:18

berduş

(16/12/2022, 10:29)Sümeyye_ yazdı: 3-cboMachineName'e aramak için bir değer yazınca enter a basınca "Böyle bir kayıt yok" diye uyarı mesajı vermek istiyorum.
bunun için ilgili koda .NoMatch ile denetleme kodu eklenebilir. aşağıya kaba bir örnek ekledim
Me.RecordsetClone.FindFirst "[MachineName] = """ & Me![cboMachineName] & """"
If RecordsetClone.NoMatch Then
MsgBox "ilgili kaydı bulamadık."
Else
Me.Bookmark = Me.RecordsetClone.Bookmark
cboCurrentUsers = Me.RecordsetClone!CurrentUsers
End If
Not: açılan her bir konuda tek soru sorulmalı. lütfen tek soru sormaya özen gösterin
iyi çalışmalar