تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في كود التعديل على السجل
#1
السلام عليكم ورحمه الله وبركاتوا

اواجه مشكله في زر التعديل
هذا هو الكود :
PHP كود :
Dim SavInto As New OleDb.OleDbCommand
            Dim ConStr 
As String _
            
"Provider=Microsoft.ace.OLEDB.12.0; Data Source =" _
            Application
.StartupPath "\student.accdb"
            
Dim Conn As New OleDbConnection(ConStr)
            
SavInto.Connection Conn
            SavInto
.CommandType CommandType.Text
            SavInto
.CommandType CommandType.Text
            SavInto
.CommandText "UPDATE tb SET Name = '" Trim(txt_name.Text) & "' , Address= '" Trim(txt_address.Text) & "' ,  phone= '" Trim(txt_phone.Text) & "'"
            
Conn.Open()
            
SavInto.ExecuteNonQuery()
            
Conn.Close()
            
MsgBox("تم التعديل على السجل بنجاح"

المشكله هنا انه عندما اقوم بالتعديل على سجل واحد جميع السجلات التي في قاعدة البيانات تاخذ نفس القيمة المعدله بالنسبه للسجل المعدل

قاعدة البيانات اسمها : Student والجدول اسمه :tb
ويحتوي على البيانات التاليه :

name,address,phone

هل هناك من يستطيع ان يشرح لي سبب المشكله .. سوف ارفق المثال لكم وارجو التعديل على الكود واتمنى التوضيع لماذا تاخذ جميع السجلات قيمة السجل المعدل

انا استخدم vb 2012


الملفات المرفقة
.rar   student database.rar (الحجم : 112.15 ك ب / التحميلات : 38)
الرد }}}
تم الشكر بواسطة:
#2
لان مافيه شرط where عدل على الكود بحيث يشترط رقم معين يستعلم عنه مثلا
كود :
where id=val(id.text)
الرد }}}
تم الشكر بواسطة:
#3
قمت بالتعديل على الكود و وضعت الشرط where ولكن النتيجه نفسها

PHP كود :
SavInto.CommandText "UPDATE tb SET  name= '" Trim(txt_name.Text) & "' , Address= '" Trim(txt_address.Text) & "', phone= '" Trim(txt_phone.Text) & "' WHERE Address ='" txt_address.Text "'" 


فهل الكود الذي كتبته غير صحيح ؟؟
الرد }}}
تم الشكر بواسطة:
#4
استعلم عن عمود لاتتكرر القيم فيه هل العمود: Address لا تتكرر القيم فيه؟؟
الرد }}}
تم الشكر بواسطة:
#5
السلام عليكم

تعديل الاستعلام

PHP كود :
SavInto.CommandText "UPDATE tb SET  name= '" Trim(txt_name.Text) & "' , Address= '" Trim(txt_address.Text) & "',phone= '" Trim(txt_phone.Text) & "' WHERE Address ='" txt_address.Text "' and  id="val(id.text

اخي العزيز عدل الid الى أي عمود Primary Key في الجدول
الرد }}}
تم الشكر بواسطة:
#6
اخي العزيز انا قمت بالتعديل على الكود وانا ف الحقيقة لم استخدم primery key لان لم ارد ذلك

قمت بتعديل الكود كالتالي :

PHP كود :
Dim SavInto As New OleDb.OleDbCommand
        Dim Cn 
As String _
        
"Provider=Microsoft.ace.OLEDB.12.0; Data Source =" _
        Application
.StartupPath "\student.accdb"
        
Dim Conn As New OleDbConnection(Cn)
        
SavInto.Connection Conn
        SavInto
.CommandType CommandType.Text
        SavInto
.CommandText "update tb set name= '" Trim(txt_name.Text) & "', address='" Trim(txt_address.Text) & "', phone='" Trim(txt_phone.Text) & "' where address= '" Trim(txt_address.Text) & "'"
        
Conn.Open()
        
SavInto.ExecuteNonQuery()
        
Conn.Close()
        
MsgBox("تمت عملية تعديل السجل بنجاح")

       
        
Me.Hide()
        
Me.Show() 

والكود شغال 100% حيث انه يقوم بالتعديل على كل سجل بمفرده حسب التعديلات التي يدخلها المستخدم على كل عمود

لكن المشكله التي ظهرت لي الان هي انه عندما اغلق البرنامج واعيد تشغيل كل سجل قمت بالتعديل عليه يرجع مثل ما كان كاني لم اعدل عليه بمعنى اخر كانه لم يقم بالتعديل على البيانات من داخل قاعدة البيانات بل على النموذج مع ان مسار الاتصال بقاعدة البيانات صحيح .. اذاً ما المشكله .؟؟
الرد }}}
تم الشكر بواسطة:
#7
اخواني سوف ارفق لكم النموذج ارجوا التعديل عليه وارفاقه مرة اخرى لي .. لاني ف الحقيقه تعبت كثير في هذا الكود بالتحديد ..


الملفات المرفقة
.rar   Database of student.rar (الحجم : 111.94 ك ب / التحميلات : 56)
الرد }}}
تم الشكر بواسطة:
#8
اعذرني اخي فقد قمت بتهيئة (Format) الجهاز لدي ولم اثبت الا فيجوال بيسك 2010 لاني واجهت مشاكل مع vb 2012
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة فى الجريد فيو salah525 10 540 05-11-23, 08:15 PM
آخر رد: justforit
Big Grin مشكلة لسه ماحدش جاوبني عليها cmd.excutenunquery Medo84 1 1,304 27-08-23, 12:47 PM
آخر رد: رضوان الجماعي
  مشكلة عند الاتصال ب sql server 2014 bassant 1 1,004 27-08-23, 12:26 PM
آخر رد: رضوان الجماعي
  كود التعديل ولاضافة رضوان الجماعي 0 766 07-09-22, 07:12 PM
آخر رد: رضوان الجماعي
  [سؤال] مشكلة فى عرض الصورة من ادخل قاعدة البيانات alims 2 1,264 17-11-21, 10:09 AM
آخر رد: سعود
  مشكلة ظهور بياانات حقلين في قاعدة بيانات على شكل علامة استفهام bassant 5 1,632 17-10-21, 02:07 PM
آخر رد: abubasilIraq
  مشكلة عند الاتصال ب sql server 2014 bassant 4 1,415 16-09-21, 02:52 PM
آخر رد: asemshahen5
  عدد السجلات ورقم السجل الحالى فى ال datagridview اسلام الكبابى 2 1,107 10-09-21, 07:36 PM
آخر رد: dalas
  [سؤال] مشكلة اضافة التاريخ مع قاعدة بيانات alims 6 2,335 25-01-21, 02:45 AM
آخر رد: alims
  مشكلة في إظهار عمود التاريخ في داتا جريد فيو mofhmy 5 6,557 12-11-20, 12:13 PM
آخر رد: bahaa.elkomy@yahoo.com

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم