فتح قاعدة بيانات اكسس 2007 من خلال فيجوال بيسيك

بدأه hishamsawah في 20 يناير 2009 · 1 رد · 816 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات

مشاركة: واتساب X فيسبوك تيليجرام

#120 يناير 2009 في 16:12 صاحب الموضوع

أخوانى الأعزاء

عندى برنامج وبه قاعدة بيانات تم تصميمها على اوفيس 2003 وتعمل بشكل جيد

وعندما قمت بتحميل اوفيس 2007 فعند استدعاء الماكرو فى الكود التالى فانه لا يعمل نهائيا

برجاء الافادة من الاساتذة الافاضل

Set hs = New ADODB.Connection

hs.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=C:\CALL\CALL.mdb"

hs.Open

Dim data As New Access.Application

data.OpenCurrentDatabase App.Path & "\CALL.mdb"

data.DoCmd.RunMacro "Total Call"

data.CloseCurrentDatabase

وشكرا للجميع واتمنى الافادة

تم تعديل هذه المشاركة بواسطة hishamsawah في 20 يناير 2009 في 16:24

#225 يناير 2009 في 16:46

جرب أخي بتغيير هذا السطر :

hs.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=C:\CALL\CALL.mdb"

إلى التالي :

hs.ConnectionString = "provider=microsoft.ACE.OLEDB.12.o;data source=C:\CALL\CALL.mdb"

وأرجو أن توفق

عدد الزوار حالياً