Sayın hocam bir türlü yapamadım lütfen bir bakarmısınız?
Dim i As Object
i = "SELECT MSysObjects.Name, MSysObjects.Type FROM MSysObjects WHERE (((MSysObjects.Type)=4)) OR (((MSysObjects.Type)=6));"
For i = 1 To i.Count
DoCmd.DeleteObject acTable, i
Next i
Bağlı Tabloları Silmek
Bu Konudaki Yorumlar |
Bağlı Tabloları Silmek - Yazar: ates2014 - 21/10/2020, 20:03
RE: Bağlı Tabloları Silmek - Yazar: ates2014 - 21/10/2020, 20:27
RE: Bağlı Tabloları Silmek - Yazar: ozanakkaya - 21/10/2020, 23:51
RE: Bağlı Tabloları Silmek - Yazar: ates2014 - 22/10/2020, 10:35
RE: Bağlı Tabloları Silmek - Yazar: feraz - 22/10/2020, 12:56
RE: Bağlı Tabloları Silmek - Yazar: ates2014 - 22/10/2020, 15:34
RE: Bağlı Tabloları Silmek - Yazar: feraz - 22/10/2020, 15:50
RE: Bağlı Tabloları Silmek - Yazar: alicimri - 22/10/2020, 16:24
RE: Bağlı Tabloları Silmek - Yazar: alicimri - 22/10/2020, 16:44
RE: Bağlı Tabloları Silmek - Yazar: feraz - 22/10/2020, 16:50
|
Konuyu Okuyanlar: 1 Ziyaretçi