Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   Form Yeni Kayıt Ekle Butonu

Form Yeni Kayıt Ekle Butonu
SümeyyeK
Yeni Üye 1-15

*
Kayıt Tarihi: 16.11.2022
Toplam 3 konu açtı.
Toplam 12 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016,
Beğeniler: 0 / 0
#1
16-12-2022, 11:51
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.


Eklenti Dosyaları
.rar   Celosoft_kullanıcı (1).rar (Boyut: 33,91 KB / İndirilme: 50)



  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 27 konu açtı.
Toplam 9.097 yorum yaptı.
Toplam 1.103 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 57 / 240
#2
17-12-2022, 03:07
1-cboMachineName ve cboCurrentUsers değer seçilirken  Kayıt ekle butonuna tıklayınca sıfırlanmıyor.
Visual Basic
  1. Private Sub btnYeni_Click()
  2. DoCmd.RunCommand acCmdRecordsGoToNew
  3. Me.cboMachineName = vbNullString
  4. Me.cboCurrentUsers = vbNullString
  5. End Sub


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
Tabloya SN adinda otomatik sayi ozellikli alan ekleyin
btnKaydet_Click olay yordamina
MsgBox "Kayýt iþlemi yapýldý", 0, " K a y ý t Ý þ l e m i " satir sonuna
Visual Basic
  1. Me.OrderBy = "SN DESC"
  2. Me.OrderByOn = True


ekleyin.


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.
Visual Basic
  1. Sub cboMachineName_AfterUpdate()
  2. Me.RecordsetClone.FindFirst "[MachineName] = """ & Me![cboMachineName] & """"
  3.     Me.Bookmark = Me.RecordsetClone.Bookmark
  4.     cboCurrentUsers = Me.RecordsetClone!CurrentUsers
  5.     If Me![cboMachineName] <> Me.MachineName Then MsgBox "Böyle bir kayit yok"
  6. End Sub


olarak değiştirin.
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Ileri Butonu Sona Geldiğinde Uyarı Vermiyor Yeni Kayıt Açıyor. programmer67 2 487 25-06-2024, 16:49
Son Mesaj: programmer67
  Yeni Kayıt Açarken Uyari evren89 2 375 15-06-2024, 10:04
Son Mesaj: evren89
  [FORM] Formda Kriterlere Göre Sorgulanan Kayıt Miktarının Form üzerinde Gösterilmesi M_Kemal_Askeri 1 401 13-05-2024, 05:10
Son Mesaj: dsezgin
  [FORM] Alt Forum Dan Tıklandıgında Yenı Form Acmak sevincili 2 469 29-03-2024, 15:54
Son Mesaj: sevincili
  Form üzerinde Bulunan Sorguda Değişiklik Yaparak Kayıt Güncelleme geneclean 5 692 13-02-2024, 15:51
Son Mesaj: dsezgin
  Virgülle Ayrılmış Verilerin Her Bir Değerini Yeni Kayıt Olarak Ekleme adnnfrm 5 702 28-11-2023, 01:37
Son Mesaj: dsezgin
  Sürekli Formda Yeni Kayıt üstte Olsun hegu 4 584 05-10-2023, 20:55
Son Mesaj: hegu
  [VBA] Kayıt Iptali: Kayıt Iptal Tablosuna Ekle, Kayıdı Sil Işlemi programmer67 6 903 21-07-2023, 10:40
Son Mesaj: onur_can

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi