25-10-23, 05:20 AM
(آخر تعديل لهذه المشاركة : 26-10-23, 02:50 AM {2} بواسطة Ahmed5.
تعديل السبب: تعديل Me.com إلى Me.con في سطر الكود الأخير
)
(24-10-23, 06:27 PM)justforit كتب :(24-10-23, 09:55 AM)AhmedEissa كتب :السلام عليكم
عندى قاعدة بيانات على أكسس 2003 تحتوى على جدول مشفر به مجموعة من الحقول
وأريد تحديث أحد حقوله بالكود فقط
رأيت أحد الزملاء يستخدم الكود أدناه ، لكن لم أتوصل لهذا الخطأ الظاهر فى الصورة
هل لديكم أكواد أخرى للإتصال بقاعدة البيانات خلاف هذا الكود الذى لم أفهمه ؟
https://www.mediafire.com/view/51ucazjqie22a9j/00.jpg/file
و عليكم السلام و رحمة الله و بركاتهالصراحة الكود غريب!!!لو امكن رفع المشروع للنظر فيه ؟
الكود مش غريب!!! لكن الأسلوب غريب!!!
وليس له داعي طالما اسم قاعدة البيانات ثابت في الكود
لإزالة الخطأ الظاهر يكون بمجرد تغيير MySettingsProperty إلى My فقط بشرط وجود 2Setting من نوع String باسم myprov وmypass وتحتوي على التالي
محتوى myprov هو
كود :
Provider=Microsoft.Jet.OLEDB.4.0;كود :
;Jet OLEDB:Database Password=*****;ووظيفة Conact هو تجميع المصفوفة لينتج محتوى نصي واحد
يمكن الاستغناء عن هذا الأسلوب بهذا الكود للسطر الأول وحذف السطرين الثالث والرابع وهما Dim strArray و Me.con.ConnectionString
كود :
Me.con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\f_school.mdb;Jet OLEDB:Database Password=*****;")
