خطای unrecognized databas format در هنگام باز کردن دیتابیس اکسس 2007

[nazanin_90]

من از کد زیر برای ارتباط با دیتابیس اکسس 2007 استفاده میکنم ولی با خطای unrecognized databas format مواجه میشوم ، علت آن چیست ؟


Dim db As DAO.Database


Set db = DBEngine.OpenDatabase(App.Path & "\" & "Database1.accdb", False, False, ";pwd=")




ضمناً :
1- از قسمت References هم DAO را انتخاب کرده ام و درحالت عادی هم دیتابیس بازمیشود و هیچ مشکلی ندارد .
2- اگر از اکسس پائین تر از ورژن 2007 استفاده کنم این خطا صادر نمیشود .
ممنون

[ایلیا آخوندزاده]

از ADODC استفاده کنید چون اون از ورژن بالای آفیس پشتیبانی میکنه

[nazanin_90]

از ADODC استفاده کنید چون اون از ورژن بالای آفیس پشتیبانی میکنه
سلام
طبق فرمایش شما عمل کردم ولی متأسفانه همان خطای قبلی صادر میشود
ابتدا طبق تصویر ضمیمه تیک مربوطه را در قسمت ریفرنس را زدم و سپس جهت ارتباط با دیتابیس از کدهای زیر استفاده کردم :


Dim strpath As String
strpath = App.Path & "\" & "Database1.accdb"
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & strpath & ""


با تشکر

[ایلیا آخوندزاده]

منظور من کامپوننت ADODC خود VB6 هست احتیاجی هم به رفرنس نداره

[nazanin_90]

منظور من کامپوننت ADODC خود VB6 هست احتیاجی هم به رفرنس نداره
با سلام و تشکر
کامپوننت ADODC را هم انتخاب کردم ولی بازهمان خطا صادر میشود
لطفاً نمونه فایل ضمیمه را ملاحظه و بررسی فرمائید
با تشکر

[nazanin_90]

با سلام و تشکر
کامپوننت ADODC را هم انتخاب کردم ولی بازهمان خطا صادر میشود
لطفاً نمونه فایل ضمیمه را ملاحظه و بررسی فرمائید
با تشکر
سلام
به نظر میرسد مشکل فوق لاینحل باشه ؛ چون با ارائه نمونه هم پاسخی ارائه نگردیده .

[alirezabahrami]

سلام
به نظر میرسد مشکل فوق لاینحل باشه ؛ چون با ارائه نمونه هم پاسخی ارائه نگردیده .
سلام
از کد زیر استفاده کن !


Dim strpath As String
strpath = App.Path & "\" & "Database1.accdb"
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strpath & ""

موفق باشید