farklı bilgisayarda ado çalışmıyor

[ali8686]

selam arkadaşlar,

laptop'umda access'ten veri çektiğim ado kodları işyerindeki bilgisayarda çalışmıyor. ikiside 2003 ama farklı versiyonlar sanırım.

ama tek fark laptopta references kısmında microsoft office 12 object library ve microsoft excel 12 object library görünürken işyerindeki bilgisayarda 11 görünüyor 12 yok. ve missing ibareli bir kütüphane de yok.

microsoft office 12 object library ve microsoft excel 12 object library kütüphaneleri nerden indirebilirim, nasıl yükleyebilirim?

veya bu mümkün değilse 12'de aşağıdaki kod ile bağlanırken 11 ile hangi kodu kullanabilirim?

cn.Open _
"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & _
ThisWorkbook.Path & "\muta.mdb"

şimdiden teşekkürler.

 

[ali8686]

problemi hallettim. belki benzer problem yaşayan birisi olur diye açıklamak isterim.

Dim cn As Object
Dim rs As Object
Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.RecordSet")

cn.Open _
"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & _
ThisWorkbook.Path & "\muta.mdb"


yukarıdaki tanım ve atamaların yerine aşağıdakileri kullanınca problem kalmadı.

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset

cn.Open "Provider=microsoft.jet.oledb.4.0;Data source=" & ThisWorkbook.Path & "\muta.mdb;"