[ahmedhhh2]

السلام عليكم ورحمة الله وبركاته 
2 مشكله 
1 عندي حقل قاعدة بيانات اكسيس data type نوع text للباركود لو الكود اكثر من 10ا حرف لا يضيف البيانات

2 عند فتح البرنامج وتخزين بيانات داخل قاعدة البيانات يتم حفظ البيانات بنجاح وعد غلق البرنامج وبمجرد فتح البرنامج يتم حذف ما تم حفظه داخل قاعدة البيانات

[ابراهيم ايبو]

السلام عليكم ورحمة الله وبركاته
اخي الكريم
المشكلة الاولى عدم قبول اكثر من 10 اعتقد والله اعلم انك غيرت في الخاصية Maxlength وجعلتها 10 والحل اما ان تضع مثلا 30 او تضغط بزر الفأرة يمين فوق الخاصية ثم تختار Reset
اما المشكلة الاخرى على ما أظن ان لديك نسختين من قاعدة البيانات واحدة في مجلد المشروع والثانية في مجلد Debug  والسبب هو انك عندما جلبت نص الاتصال عن طريق اضافة اتصال بال Wizard ظهرت رسالة تفيد بانه سيتم اضافة نسخة من قاعدة البيانات  في مجلد المشروع وانت وافقت عليها
والحل الاسلم لهذه المشكلة هي اعادة انشاء المشروع من جديد واضافة قاعدة البيانات في مجلد الـ debug والاتصال بالكود

[ahmedhhh2]

تم حل المشكله الاولي مش عارف السبب كان ايه كنت اجلب البيانات من الحقل هكذا اظن المشكله بدالة Item
dr = SavInto.ExecuteReader()
If dr.Read Then
'DataGridView1.Item(0, e.RowIndex).Value = dr.Item("tkhid")
Else
MsgBox("رقم الصنف غير موجود في قاعدة البيانات")

End If
تم التعديل هكذا

Reader22 = Cmd.ExecuteReader
While Reader22.Read
DataGridView1.Item(0, e.RowIndex).Value = Trim((Reader22("tkhid").ToString()))
End While

---

المشكله رقم 2 فعلا تم اضافة 2 قاعدة بيانات بسبب اضافة ريبورت فيو طب الحل ايه كل ما احتاج اضيف تقرير جديد واصافة جدول جديد اعيد البرنامج ولا في حل

[ahmedhhh2]

تم حل مشكلة عدم حفظ البيانات ايضا
تم الاتصال بقعدة البيانات الاخري بس اختار المسار يدوي

كنت اتصل عن طريق هذا الكود " & Application.StartupPath & "\77.mdb &"
اريد الرجوع للخلف 2 مجلد جربت اسنخدام / .. ومش نافع

[ahmedhhh2]

تم حل المشاكل والحمد لله