Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   Mükerrer Kayıt Ile Ilgili Bir Soru

Mükerrer Kayıt Ile Ilgili Bir Soru
programmer67
Aktif Üye 40-100

*
Kayıt Tarihi: 29.08.2016
Toplam 19 konu açtı.
Toplam 84 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010 TR,
Beğeniler: 1 / 1
#1
26-04-2023, 15:41 (En son düzenleme: 26-04-2023, 15:42 programmer67.)
Formda Peşinat'ı Kasaya İşle butonu ile müşteri adına girilen peşintı frm_kasa formuna işliyorum. Fakat mükerrer kayıt olmasını engellemek istiyorum. Aynı öğrencinin aynı tarihte peşinat girişi Kasaya İşle denildiğinde "daha önce peşinat girilmiştir" diye uyarmasını istiyorum.
Şimdiden teşekkür ederim hocalarım.


Eklenti Dosyaları
.rar   cizgi - 2604.rar (Boyut: 558,41 KB / İndirilme: 41)



  Bul
  Alıntı
Bu mesajı beğenenler:
feraz
Aktif Üye 100-150

*
Kayıt Tarihi: 14.07.2012
Toplam 10 konu açtı.
Toplam 118 yorum yaptı.
Toplam 15 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013 TR, Office 2016 TR,
Beğeniler: 23 / 2
#2
26-04-2023, 21:06
Hangi formda işlem yapacaksınız?
Kriter olarak tarih ve öğrenci adımı olacak sadece?
Bence tam açıklarsanız çözüm zor değil.



  Bul
  Alıntı
Bu mesajı beğenenler:
programmer67
Aktif Üye 40-100

*
Kayıt Tarihi: 29.08.2016
Toplam 19 konu açtı.
Toplam 84 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010 TR,
Beğeniler: 1 / 1
#3
27-04-2023, 08:39
Günaydın, CizgiUstu formunda Kasaya İşle butonu var. Buradan işlem yaptığında frm_kasa formuna işlem yapıyor. Fakat frm_kasa formuna aynı kaydın yapılması durumunda uyarı versin istiyorum. Aslında kolay birşey ama yapamadım.



  Bul
  Alıntı
Bu mesajı beğenenler:
feraz
Aktif Üye 100-150

*
Kayıt Tarihi: 14.07.2012
Toplam 10 konu açtı.
Toplam 118 yorum yaptı.
Toplam 15 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013 TR, Office 2016 TR,
Beğeniler: 23 / 2
#4
27-04-2023, 10:25
Günaydın.
Aslında Dlookup ile yapmışsınız ama tam olmamış galiba böyle görmüştüm kodda.Aynı mantıkla olabilir yada Dao yada Ado ilede yapılabilir.Aynı kayıt derken kriter olarak ne olacak?
Dlookup ile yapılacaksa bir Long olarak değişken yapılır ve bundan dönecek sonuca göre işlem yapılabilinir diye düşünüyorum.Ado ilede basit olur dediğim gibi kriter bilmek gerek.
Kendi adıma akşam bakabilirim tekrar.



  Bul
  Alıntı
Bu mesajı beğenenler:
feraz
Aktif Üye 100-150

*
Kayıt Tarihi: 14.07.2012
Toplam 10 konu açtı.
Toplam 118 yorum yaptı.
Toplam 15 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013 TR, Office 2016 TR,
Beğeniler: 23 / 2
#5
27-04-2023, 21:26 (En son düzenleme: 28-04-2023, 10:02 feraz.)
Visual Basic
  1. Public Function kasa2()
  2. Dim tarih As Date
  3. Dim aciklama As String
  4. 'DoCmd.SetWarnings False
  5. tarih = Forms!CizgiUstu!tarih
  6. veliadi = Forms!CizgiUstu!txt_veli_adi.Value
  7.  
  8. With Forms!CizgiUstu!
  9.     If DLookup("tarih", "tbl_kasa", "tarih ='" & tarih & "'") > 0 Then
  10.         'If DLookup("ogrenci_id", "ogrencitakip", "kayit_turu ='" & Me.ak_ogrencitipi & "' ") Then
  11.         MsgBox " & veliadi & adlý müþteriye daha önce Peþinat girilmiþtir.", vbCritical
  12.     Else
  13.         DoCmd.RunSQL ("INSERT INTO tbl_kasa(ogrenci_id,tarih,gelir,islem_tipi,aciklama) VALUES (.txt_ogrencid, '" & .tarih & "', '" & .pesinat & "', 'Gelir', '" & veliadi & " adlý müþteri Peþinat ödedi.')")
  14.     End If
  15.     'DoCmd.RunSQL ("insert into ogretmen_takip_odemeler(ogretmen_id,ogretmen_adi,odenen,odeme_tarihi) values (" & Me.ak_ogretmenler.Column(0) & ", '" & Me.ak_ogretmenler.Column(1) & "', '" & Me.txt_odemegir & "', '" & Date & "')")
  16. End With
  17. DoCmd.SetWarnings True
  18. End Function


Yukardaki gibi deneyim ama eklemede hata veriyor birde Dlookup içini ayarlayabilirsiniz.



  Bul
  Alıntı
Bu mesajı beğenenler:
programmer67
Aktif Üye 40-100

*
Kayıt Tarihi: 29.08.2016
Toplam 19 konu açtı.
Toplam 84 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010 TR,
Beğeniler: 1 / 1
#6
28-04-2023, 08:52 (En son düzenleme: 28-04-2023, 08:52 programmer67.)
Mükerrer kaydı denemek istediğimde Veri türü uyuşmazlığı veriyor dostum, neden bunu yapıyor anlamadım bir türlü.


Eklenti Dosyaları
.png   err1.png (Boyut: 19,89 KB / İndirilme: 25)
.png   err2.png (Boyut: 20,17 KB / İndirilme: 20)



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


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Access'in Kapasitesi ile İlgili fatihsipahi 4 3.199 02-02-2024, 21:38
Son Mesaj: adnnfrm
  Farklı Tablodan Mükerrer Olmayan Bilgi Almak bilservisci 5 147 17-12-2023, 18:04
Son Mesaj: dsezgin
  Ilgili Güne Göre Koşullu Sorgu turgay52 6 232 23-08-2023, 11:50
Son Mesaj: turgay52
  [VBA] Kayıt Iptali: Kayıt Iptal Tablosuna Ekle, Kayıdı Sil Işlemi programmer67 6 313 21-07-2023, 10:40
Son Mesaj: onur_can
  [TABLO] Mükerrer Engelleme omergenc7 11 424 01-02-2023, 00:01
Son Mesaj: omergenc7
access-sql-17 SORU VE ÇÖZÜM HAKKINDA! onur_can 6 6.895 27-01-2023, 01:01
Son Mesaj: BeyTor
  [SORGU] Ilgili Satırda Bir önceki Satırın Notlarını Görmek dmn815 2 193 15-10-2022, 09:48
Son Mesaj: dmn815
  Açılır Kutuda Seçildiğinde Ilgili Firma Gelmesi kursun 9 402 08-10-2022, 18:45
Son Mesaj: kursun

Foruma Git:


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