Access Te MÜkerrer (tekrar Eden )kayitlari Bulmak

Hakan ERDOST

Destek Ekibi
Destek Ekibi
Katılım
12 Eylül 2004
Mesajlar
871
Excel Vers. ve Dili
Excel 2019 Türkçe (Ev)
Excel 2013 Türkçe (Okul)
Herkese iyi akşamlar 30000 kişilik bir vieritabanında adı soyadı sütunlarına göre mükerrer kayıtları nasıl bulabilirim.tEŞEKKÜRLER
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın hexdesimal,

Ekle mönüsünden sorgudan yinelenleri bul sorgusu eklerseniz. Mükerrer kayıtları bulabilirsiniz.

iyi çalışmalar:)
 

Hakan ERDOST

Destek Ekibi
Destek Ekibi
Katılım
12 Eylül 2004
Mesajlar
871
Excel Vers. ve Dili
Excel 2019 Türkçe (Ev)
Excel 2013 Türkçe (Okul)
Sayın modalı öncelikle teşekkürler.Ancak benim ekle açılır menüsünde sorgu seçeneği yok!...
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın hexadesimal,

Olmaz olur mu hiç. Access uygulama penceresinden sorgular sekmesine gelin. ondan sonra ana mönü den ekle yi seçin orada tüm bileşenleri görüyor olmanız gerekir (Form, sorgu,rapor vs.)

İyi çalışmalar:)
 
Katılım
16 Kasım 2005
Mesajlar
1,090
Excel Vers. ve Dili
Access 2002
Madem konu açıldı bende sorayım daha önce girilmiş bir kayıt varsa bizi uyaran bir ileti olabilir mi önceki sitede(taşınmadan önce yani) vardı buna benzer bir soru ama malesef ki tekrar bakmak mümkün değil konu benziyor diye yinelemiş olmayorsam lütfen cevap...

kolay gelsin.
 
Katılım
4 Temmuz 2005
Mesajlar
112
Excel Vers. ve Dili
Office 2007 Enterprise
Dim SID As String
Dim stLinkCriteria As String
Dim rsc As DAO.Recordset

Set rsc = Me.RecordsetClone

SID = Me.[ALAN ADI].Value
stLinkCriteria = "[ALAN ADI]=" & "'" & SID & "'"


If DCount("[ALAN ADI]", "TABLO_ADI", stLinkCriteria) > 0 Then
'Undo duplicate entry
Me.Undo

MsgBox "Girmeye çalıştığınız " _
& SID & " No'lu ALANADI daha önce girilmiş." _
& vbCr & vbCr & "Lütfen Kayıtlarınızı Kontrol Ediniz.", vbInformation _
, "Tekrarlanan ALANADI Numarası"

rsc.FindFirst stLinkCriteria
Me.Bookmark = rsc.Bookmark
End If

Set rsc = Nothing

Bu kodu o alanın güncelleştirme öncesine yazarsanız tekrarlanan kayıt olduğunu gösteren bir mesaj alırsınız..
 
Üst