Mükerrer Kayıt
Tarih
18/08/2011 01:16
Konu Sahibi
idrisy
Yorumlar
4
Okunma
1950
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
idrisy
Aktif Üye
Kullanici Avatari
Aktif Üye
İ.... Y....
171
27/12/2008
11
Osmaniye
Ofis 2003
29/03/2017,18:26
Arkadaşlar mükerrerkayıt konusunda yaptığım örneği paylaşmak istedim. Umarım arkadaşlara yardımı olur umarım. Hem mükerrer kayıt engelleme hemde tc kimlik no doğrulama. İkisi birarada.


Ek Dosyalar
.rar   mükerrerkayitengelle.rar (Dosya Boyutu: 18,73 KB / İndirme Sayısı: 132)
Cevapla

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.756
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
17/05/2017,16:25
Sponsor Reklam
Sayın idrisy
Yayınladığınız örnekte function ekle() fonksiyonunda kodlarda eksik var. Bu nedenle hata uyarısı alınmakta. Ben düzeltilmiş biçimini aşağıya ekledim. Siz dosyanızda bubunla ilgili değişikliği yaparak tekrar yollayınız. Bu arada sekme durağı konusunda da bir çalışma yapmalısınız. Metin kutuları sırayla değil, karışık olarak geliyor. Ayrıca sınıf tablosu olmadığı için de hata veriyor. Son olarak da nerede mükerrer kontrolu yapıldığını anlayamadım. Ayrı ayrı kayıtlarda önce Tc kimlik, sonra numara, sonra ad-soyad olarak mükerrer kayıtlar yaptım, sorun çıkmadı. Sonra da bir kaydın birebir aynını tekrar kaydettim, yine ses çıkmadı. Acaba mükerrer derken, hangi özelliğin tekrarlanmayacağını yazar mısınız.

Fonksiyonun düzeltilmiş biçimi:

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Function ekle()
Dim rst As DAO.Recordset

Set rst = db.OpenRecordset("SELECT * FROM tbl_ogrenciler;")
rst.AddNew
rst.Fields("ID") = IIf(Nz(DMax("ID", "tbl_ogrenciler") + 1, 0) = 0, 1, Nz(DMax("ID", "tbl_ogrenciler") + 1, 0))
rst.Fields("tckimlikno") = Left(Me.tckimlikno, 11)
rst.Fields("adisoyadi") = Me.adi
rst.Fields("okulno") = Me.okulno
rst.Fields("cinsiyeti") = Me.cinsiyeti
rst.Fields("sinifi") = Me.sinifi
rst.Fields("anneadi") = Me.anneadi
'rst.Fields("yil") = Me.yil
'rst.Fields("dosyano") = Me.dosyano
rst.Update
rst.Close
db.Close
Requery

Me.Liste10.Requery
End Function


İnadına, ille de Accesstr.net...
Cevapla

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.756
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
17/05/2017,16:25
Bende tc kimlik alanında tıklayınca hata veriyor. Hala diğer dediklerim (sekme sırası ve siniflar adlı tablo) düzelmemiş.
kullandığınız sayim(metin) adlı fonksiyon tanımlı değil sanırım.
İnadına, ille de Accesstr.net...
Cevapla

idrisy
Aktif Üye
Kullanici Avatari
Aktif Üye
İ.... Y....
171
27/12/2008
11
Osmaniye
Ofis 2003
29/03/2017,18:26
Sponsor Reklam
Arkadaşlar kodun birisini silmişim. Yenisini ekliyorum.


Ek Dosyalar
.rar   mükerrerkayitengelle.rar (Dosya Boyutu: 19,01 KB / İndirme Sayısı: 30)
Cevapla

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.756
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
17/05/2017,16:25
Şimdiki örneğinizde daha çok kod silinmiş. Fonksiyonların hiçbiri yok ve bırakın mükerreri, normal kaydı bile yapamazsınız. BU arada tüm önerilerime de kulak tıkıyorsunuz. Neyse, ben çalışmanızı düzenleyip özüne dokunmadan çalışır hale getirdim. Bu arada hata veren yerler düzeltildi, yeni bir sını tablosu ve formu eklendi. Tckimlik alanına selstart uygulandı. Kaydetme fonksiyonu mükerrer olmama şartına bağlandı. İncelemek isteyen arkadaşlar lütfen benim eklediğim örneği inceleyiniz, İdris Bey'in örneğinin düzeltilmiş biçimidir.


Ek Dosyalar
.rar   mukerrer.rar (Dosya Boyutu: 27,41 KB / İndirme Sayısı: 134)
İnadına, ille de Accesstr.net...
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Information Okullar a Diploma Kayıt Programı bayFARUK 17 9.120 09/05/2016, 10:47 nesatanc
  Trafik Kaza Kayıt Programı perisanoglu 4 1.442 26/06/2015, 01:20 C*e*l*o*y*c*e
Star Dinamik Kayıt Arama, Listeleme ve Aktarma Aracı Taruz 9 4.254 25/01/2015, 21:12 yorum70
  Eğitim / Toplantı Kayıt Takip Programı SCavusoglu 6 2.979 20/01/2015, 11:25 ertungaaga
  Mükerrer Kayıt Kontrolü. access06 1 1.022 05/12/2014, 21:29 ozanakkaya


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status