+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ما سبب هذا الخطأ وكيف يتم الحل؟ (/showthread.php?tid=37562)
ما سبب هذا الخطأ وكيف يتم الحل؟ - أبو عبدالله الحلواني - 23-01-21
يظهر لي هذا الخطأ
System.InvalidOperationException
HResult=0x80131509
Message=The 'Microsoft.ACE.OLEDB.12.0' provider is not registered on the local machine.
Source=<Cannot evaluate the exception source>
StackTrace:
<Cannot evaluate the exception stack trace>
رغم أنه مثبت لدي علي الجهاز أوفيس 2010 و 2016
وعند اختبار الاتصال بقاعدة البيانات من اضافة اتصال يتصل بنجاح مثل هذه الصورة
فلماذا يفشل الاتصال من داخل الكود
وجزاكم الله خيرا
RE: ما سبب هذا الخطأ وكيف يتم الحل؟ - أبو عبدالله الحلواني - 23-01-21
هذا هو الكود بالكامل
كود :
Public Sub ChangePassdbe(ByVal dbepas As String, ByVal pass As String)
Dim cn As OleDb.OleDbConnection
cn = New OleDb.OleDbConnection
Dim cmd As OleDb.OleDbCommand
cmd = New OleDb.OleDbCommand
If Len(dbepas & "") > 0 Then
cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & dbepas & ";Mode=Share Deny Read|Share Deny Write;"
cn.Open()
cmd.Connection = cn
cmd.CommandText = "ALTER DATABASE PASSWORD [" & pass & "]NULL"
cmd.ExecuteNonQuery()
cn.Close()
MsgBox("done!")
End If
End Subالكود احاول استخدامه لتغير كلمة السر لقاعدة بيانات المرفقة برمجيا
وجزاكم الله خيرا
RE: ما سبب هذا الخطأ وكيف يتم الحل؟ - moosa_alabri - 23-01-21
اذهب الى
my project اختر التبويب compile غير ال platform الى ِActive (x86)
RE: ما سبب هذا الخطأ وكيف يتم الحل؟ - أبو عبدالله الحلواني - 25-01-21
(23-01-21, 10:02 PM)moosa_alabri كتب : اذهب الى
my project اختر التبويب compile غير ال platform الى ِActive (x86)
جزاك الله خيرا
ولكن لم أجد بها الا خيار واحد كما بالصورة المرفقة ما المشكلة اذا ؟
وهل كود الاتصال لن يعمل مع بيئة العمل 64 ؟
RE: ما سبب هذا الخطأ وكيف يتم الحل؟ - moosa_alabri - 25-01-21
نعم لن يعمل الا اذا غيرت بيئة العمل كما هو واضح في الصورة التالية
RE: ما سبب هذا الخطأ وكيف يتم الحل؟ - أبو عبدالله الحلواني - 26-01-21
(25-01-21, 09:44 PM)moosa_alabri كتب : نعم لن يعمل الا اذا غيرت بيئة العمل كما هو واضح في الصورة التاليةهذا الخيار غير موجود عندي كيف اظهره
ولكن هل يوجد كود اتصال خاص ببيئة العمل 64 بت وآخر ببيئة العمل 32 بت؟!!
أشكر حضرتك علي تجاوبك وصبرك معي فلازلت أخطو خطواتي الأولي مع الفجول بيسك
وجزاك الله خيرا
RE: ما سبب هذا الخطأ وكيف يتم الحل؟ - ZaerAllail - 28-01-21
اخي الكريم رسالة الخطأ تفيد بأن ملف تعريف الإتصال الخاص بنسخة الأوفيس غير مثبت على الجهاز لديك
فقط قم بتثبيت النسخة المناسبة لمشروعك وينتهي كل شي !
بإمكانك تحميل النسخة من هذا الرابط
https://www.microsoft.com/en-us/download/confirmation.aspx?id=13255