Skip to main content

AccessTr.neT M.

Tekrarlayan Data Temzileme

Konu

Çö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ı: 14)
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 Adlı Kullanıcıdan Alıntı: 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:
1
2
3
4
5
6
7
8
9
10
11
12
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 Adlı Kullanıcıdan Alıntı: form üzerine ekleyeceğiniz "Btntekrarsil" adlı butona aşağıdaki kodu girip dener misiniz

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
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