Ado Bağlantı ve Kayıt Seti Açma Yöntemleri

Bu dosya, Excel VBA içinde ADO (ActiveX Data Objects) kullanarak bir Access veritabanına (.mdb) bağlanma ve kayıt seti açma yöntemlerini örneklerle gösterir. Bağlantı durumu mesaj kutusuyla görülür, kayıt setindeki veriler ise bir UserForm üzerindeki ListBox'a aktarılır.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: Veri içermeyen sayfadır; üzerinde ExcelDepoTest formunu açan CommandButton1 düğmesi bulunur.
• ExcelDepoTest: ListBoxExcelDepo adlı ListBox ve dört düğmeden (btnMtd1 - btnMtd4) oluşan UserForm'dur.
• Module1: Üç farklı bağlantı yöntemini içeren Baglan1, Baglan2 ve Baglan3 makrolarını barındırır.

Dosyada çalışma sayfası formülü bulunmaz.

Makrolar​

Bağlantı yöntemleri (Module1 ve Sayfa1):

• Baglan1: Bağlantı metnini bir değişkene atar ve Open metoduna parametre olarak verir.
• Baglan2: Bağlantı metnini doğrudan Open içine yazar.
• Baglan3: Bağlantı metnini doğrudan Open içine yazar; çalışma biçimi Baglan2 ile aynıdır.

Üçü de Microsoft.Jet.OLEDB.4.0 sağlayıcısıyla exceldepodb.mdb dosyasına bağlanır, State değerini mesaj kutusunda gösterir (1 açık bağlantı demektir) ve bağlantıyı kapatır. Module1 içindeki sürümler veritabanını çalışma kitabının bulunduğu klasörde arar; Sayfa1 içindeki sürümler ise D:\exceldepo\ yolunu kullanır.

Kayıt seti yöntemleri (ExcelDepoTest formu): Dört düğme de Ilceler tablosundan "SELECT * FROM Ilceler" sorgusuyla veri çeker ve sonucu GetRows ile ListBox'a yazar.

1. btnMtd1: Connection nesnesinin Execute metodunu kullanır.
2. btnMtd2: Command nesnesinin Execute metodunu kullanır.
3. btnMtd3: Command nesnesini Recordset'in Open metoduna verir.
4. btnMtd4: Ayrı bir Connection nesnesi açmadan, Recordset'in Open metoduna sorguyu ve bağlantı metnini birlikte verir.

Kodda dosya silme veya dışarıya bağlantı işlemi yoktur; yalnızca yerel veritabanı okunur.

Nasıl kullanılır​

1. ZIP dosyasından ADO.xlsm dosyasını çıkarın ve açarken makroları etkinleştirin.
2. exceldepodb.mdb veritabanını ADO.xlsm ile aynı klasöre koyun.
3. Sayfa1 üzerindeki düğmeye tıklayarak ExcelDepoTest formunu açın.
4. Form üzerindeki dört düğmeden birine tıklayarak Ilceler tablosunun ListBox'a yüklenişini deneyin.
5. Bağlantı örnekleri için Alt+F8 ile Baglan1, Baglan2 veya Baglan3 makrosunu çalıştırın.
6. Sayfa1 içindeki makrolar D:\exceldepo\ yolunu kullandığından, veritabanı farklı bir yerdeyse koddaki Data Source yolunu değiştirin.