A.S.C Filtre, Grafik ve Raporlama Eklentisi

tüm tabloları silme
#1
merhaba arkadaşlar, kolay gelsin.

CurrentDb.Execute "DROP TABLE ALISLAR;" komutuyla sadece ALISLAR tablosunu silebiliyorum.
tüm tabloları silmek için tek tek yazmak gerekiyor.

tek komutla tüm tabloları nasıl silebilirim acaba?

İyi günler



  Alıntı
Bu mesajı beğenenler:
#2
Visual Basic
  1. For Each trz In CurrentDb.TableDefs
  2.    If Left(trz.Name, 4) <> "Msys" And Left(trz.Name, 1) <> "~" Then
  3.        CurrentDb.Execute "DROP TABLE " & trz.Name
  4.    End If
  5. Next


Merhaba..
Bu şekilde silebilirsiniz..



  Alıntı
Bu mesajı beğenenler:
#3
"trz" yazan kısımlarla ilgili bir değişiklik yapmam gerekiyormu?
hata verdide



  Alıntı
Bu mesajı beğenenler:
#4
ilişkili tablolarda sorun çıkabilir önce ilişkileri silmeniz gerekebilir
aşağıdaki kodu dener misiniz
ilişkileri silmek için kullanılıyor
Taruz hocamın kodu üzerine yazarak deneyin
Visual Basic
  1. Dim rel As Relation
  2. 'tablolar arasındaki ilişkileri silme kodu________________
  3.    For Each rel In CurrentDb.Relations
  4.        CurrentDb.Relations.Delete rel.Name  ', rel.Attributes
  5.    Next rel
  6. 'tablolar arasındaki ilişkileri silme kodu________________Bitti





  Alıntı
Bu mesajı beğenenler:
#5
sn halily merhaba
tabloları silmedi.



  Alıntı
Bu mesajı beğenenler:
#6
aşağıdaki gibi dener misiniz kodu
Visual Basic
  1. Dim rel As DAO.Relation
  2. 'tablolar arasındaki ilişkileri silme kodu________________
  3.    For Each rel In CurrentDb.Relations
  4.        CurrentDb.Relations.Delete rel.Name  ', rel.Attributes
  5.    Next rel
  6. 'tablolar arasındaki ilişkileri silme kodu________________Bitti
  7.  
  8. 'tabloları silme kodu________________
  9. For Each trz In CurrentDb.TableDefs
  10.    If Left(trz.Name, 4) <> "Msys" And Left(trz.Name, 1) <> "~" Then
  11.        CurrentDb.Execute "DROP TABLE [" & trz.Name & "]"
  12.    End If
  13. Next





  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [VBA] Liste Kutusundan Seçili Yedek Kayıt Silme Sorunu Ahmet51 4 142 11-11-2019, 14:47
Son Mesaj: Ahmet51
  [FORM] Silme Sorgusu evren89 1 157 03-09-2019, 00:37
Son Mesaj: halily
  [FORM] Sharepoint Sitesi Tüm Tabloları Yeniden Bağla hatası tolgahanay8 17 1.421 09-08-2019, 11:14
Son Mesaj: tolgahanay8
  [FORM] Klasör (Folder) Silme İlhanYaylıcı 2 200 26-04-2019, 13:38
Son Mesaj: İlhanYaylıcı
  Tabloları Birleştirmek mithrill74 8 13.613 23-04-2019, 23:36
Son Mesaj: neco_can
access-sql-9 [FORM] Liste kutusunda sadece seçili kişiyi silme md79x 12 6.636 24-01-2019, 12:43
Son Mesaj: dsezgin
  [VBA] Metin Kutusu ve Liste Kutusu Arasında Kaydetme, Yeni Kayıt Ekleme ve Silme Sorunu mmert06 6 622 12-01-2019, 16:05
Son Mesaj: mmert06
  [FORM] Listeden çoklu seçimle silme yapma onkay 4 596 14-11-2018, 11:36
Son Mesaj: onkay

Foruma Git:


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