(22-10-21, 12:55 AM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي الكريم كلمة المرور واسم المستخدم مطلوبتان وانت لم تذكرهما اضافة الى ان قاعدة البيانات لم تفتح معي
المهم في الفورم التي سيدخل عليها المدير اجعل   DataGridview1.ReadOnly=true حتى لايستطيع التغيير فيها
وفي حدث DataGridView1_CellContentClick النقر على صف في الداتاغرايد سيجلب رقم الايدي ويضعه في المتغير الذي ستعرفه
ويجلب الحقل الذي سيكتب فيه المدير الى مربع التكست بوكس 

كود :

 ' عرف هذا المتغير في الاعلى
   Dim N_Id As Integer = 0
   Private Sub DataGridView1_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick
       N_Id = DataGridView1.CurrentRow.Cells("اسم عمود الاي دي في الجدول").Value.ToString()
       State_H.Text = DataGridView1.CurrentRow.Cells("اسم عمود التنفيذ في الجدول").Value.ToString()
   End Sub

الان مع كل اختيار لصف سيجلب الايدي مع حقل المدير بعدها سيكتب المدير في التكست بوكس ويضغط على زر تحذيث الطلب والذي ستكون اكواده التعديل على السجل ذو الاي دي الموجود في المتغير الذي عرفناه 
طبعا ستعدل حقل واحد فقط هو حقل التكست بوكس(الخاص بالمدير) بشرظ الاي دي المذكور

(22-10-21, 12:48 PM)ابراهيم ايبو كتب :

عدل هذا السطر

كود :

N_Id = DataGridView1.CurrentRow.Cells("اسم عمود الاي دي في الجدول").Value.ToString()

الى هذا السطر

كود :

N_Id = DataGridView1.CurrentRow.Cells("اسم عمود الاي دي في الجدول").Value

اي الغ كلمة .Tostrıng لان المتغير رقمي واسف على الخطأ

(22-10-21, 09:53 PM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي الكريم قاعدة البيانات لاتفتح حتى مع البرنامج ومع ادخال كلمة المرور والسر
والرسالة تقول عدم توافق اصدار الاكسس 
The database you are trying to open requires a newer version of Microsoft Access.
حاول ان ترفع قاعدة البيانات باصدار 2003 و2007
لا استطيع مساعدتك اذا لم اتمكن من تشغيل قاعدة البيانات والدخول الى البرنامج