aynı form icinde 2 farklı acces dosyanına baglanma

[uguristanbul]

2 farklı veri tabanına baglanmak

--------------------------------------------------------------------------------
Private baglan As Object, rs As Object
Sub baglanti()
Set baglan = CreateObject("adodb.connection")
baglan.Open "provider=microsoft.jet.oledb.4.0;data source=" & ThisWorkbook.Path & "\komisyon.mdb"
End Sub
Private baglan2 As Object, rs As Object
Sub baglanti2()
Set baglan2 = CreateObject("adodb.connection")
baglan2.Open "provider=microsoft.jet.oledb.4.0;data source=" & ThisWorkbook.Path & "\sirket.mdb"
End Sub
yukardaki kodlardan birini kullanırsam sorun yok ancak
form icinde 2 farklı (hatta daha fazla )acess dosyasına baglanmam
gerekiyor ama beceremedim
dosya buyuk olduğu icin eklemeyedimde
lutfen yardım

 

[mehmeth_86]

Sn.uguristanbul;

tüm tabloları tek bir çatı altında toplayarak merkezi bir ilişkisel veri tabanı oluşturman daha kolay olur. Bence diğer veritabanlarındaki tabloları birleştir ve merkezi bir yapı oluştur. Yok eğer illa da diğer veri tabanlarına bağlanmak isterseniz; "Bağlı Tablo Yöneticisi" ile bağlanabilirsiniz.

İyi Çalışmalar...