Skip to main content

AccessTr.neT


Tekrarlayan Data Temzileme

Tekrarlayan Data Temzileme

Çözüldü #1
Merhaba,

sorgu ile ana tablodan aynı kayıtları da otomatik olarak silmek istiyorum.

örnek ektedir
.zip Data.zip (Dosya Boyutu: 4,73 MB | İndirme Sayısı: 15)
Cevapla
#2
Hangi sütundaki veriler baz alınacak belirtir misiniz? Ayrıca burada bahsettiğiniz kayıt giriş esnasında mükerrer kayıt varsa mı silsin, yoksa mevcut tablodaki verilerden mükerrer olanları mı silsin? Bir de örneğin mükerrer 4 kayıt varsa 1'i kalacak 3'ümü silinecek? Yoksa tamamı mı?
Cevapla
#3
(13/03/2019, 22:55)ercansahin yazdı: Hangi sütundaki veriler baz alınacak belirtir misiniz? Ayrıca burada bahsettiğiniz kayıt giriş esnasında mükerrer kayıt varsa mı silsin, yoksa mevcut tablodaki verilerden mükerrer olanları mı silsin? Bir de örneğin mükerrer 4 kayıt varsa 1'i kalacak 3'ümü silinecek? Yoksa tamamı mı?

mevcut kayıttaki mükerrer olan kayıtlar silinecek. 4 kayıt varsa 3 silinecek 1 kalacak
Cevapla
#4
form üzerine ekleyeceğiniz "Btntekrarsil" adlı butona aşağıdaki kodu girip dener misiniz

Kod:
Private Sub Btntekrarsil_Click()

Dim strSQL As String
strSQL = " SELECT * INTO [Pds_DataTmp] FROM (SELECT DISTINCT * FROM Pds_Data);"
DoCmd.SetWarnings False
  DoCmd.RunSQL strSQL
  DoCmd.RunSQL "delete from Pds_Data"
  CurrentDb.Execute "INSERT INTO Pds_Data SELECT * FROM Pds_DataTmp;"
  DoCmd.DeleteObject acTable, "Pds_DataTmp"
DoCmd.SetWarnings True

End Sub

Cevapla
#5
(14/03/2019, 12:11)haliliyas yazdı: form üzerine ekleyeceğiniz "Btntekrarsil" adlı butona aşağıdaki kodu girip dener misiniz

Kod:
Private Sub Btntekrarsil_Click()

Dim strSQL As String
strSQL = " SELECT * INTO [Pds_DataTmp] FROM (SELECT DISTINCT * FROM Pds_Data);"
DoCmd.SetWarnings False
 DoCmd.RunSQL strSQL
 DoCmd.RunSQL "delete from Pds_Data"
 CurrentDb.Execute "INSERT INTO Pds_Data SELECT * FROM Pds_DataTmp;"
 DoCmd.DeleteObject acTable, "Pds_DataTmp"
DoCmd.SetWarnings True

End Sub

teşkkürler tam ihtiyacım olan bu
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task