تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] خطأ في زرار التعديل
#1
زرار التعديل في المشروع لايسمح بتكرار الاسم مرة اخري داخل المشروع وهذا يعمل بطريقة صحيحة ولكن عند تغيير رقم المحمول برغم عدم تكراره مرة اخري تظهر رسالة تم تكرار هذا الاسم برغم ان التغيير يكون في رقم المحمول ليس في الاسم


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 113.38 ك ب / التحميلات : 55)
الرد }}}}
تم الشكر بواسطة:
#2
يا اخي غريب مفيش مفصلين هنا يصلحو الزرار Big Grin
=============

اخي بالنسبة لزرار الحفظ مفيش مشكلة لكن المشكلة في التعديل


من زرار التعديل احذف الاستعلام هذا
PHP كود :
Dim m As String
        Dim SQLstr2 
As String "SELECT nam FROM student  WHERE  nam= '" & (TextBox2.Text) & "'"
        ' Dim da = New OleDbDataAdapter(SQLstr, con)

        If CON.State() Then CON.Close()
        CON.Open()
        Dim cmd As New OleDbCommand(SQLstr2, CON)
        Dim dr As OleDbDataReader
        dr = cmd.ExecuteReader()
        Dim b As String = ""
        If dr.Read() = True Then
            m = dr.Item(0).ToString
            CON.Close()
        End If
        If TextBox2.Text = m Then
            MsgBox(" هذه الحالة مسجلة قبل ذلك  ", , "رسالة")
           
            Exit Sub
        End If 


وابق على هذا فقط

PHP كود :
Try
            
Dim SavInto1 As New OleDb.OleDbCommand
            Dim Conn 
As New OleDbConnection(conStr)
            
SavInto1.Connection Conn
            SavInto1
.CommandType CommandType.Text
            SavInto1
.CommandText "UPDATE student set nam ='" Trim(TextBox2.Text) & "', mob ='" Trim(TextBox3.Text) & "' where id = " TextBox1.Text " "
            
Conn.Open()
            
SavInto1.ExecuteNonQuery()
            
Conn.Close()
            
MsgBox("تم التعديل بالنجاح", , "رسالة")
            
Me.Refresh()
            
'    m()
            mov()
        Catch ex As Exception
        End Try 


بالنسبة للحفظ اتركه مثل ما هو

بالتوفيق اخي
{وَلَنَبْلُوَنَّكُمْ حَتَّى نَعْلَمَ الْمُجَاهِدِينَ مِنْكُمْ وَالصَّابِرِينَ وَنَبْلُوَ أَخْبَارَكُمْ} [محمد: 31].

الرد }}}}
تم الشكر بواسطة:
#3
انت كده لم تحلوا المشكلة انا مش عايز اسم العميل يكرر مرتين بس ممكن رقم المحمول يكرر عادي مفيش مشكلة
الرد }}}}
تم الشكر بواسطة:
#4
تفضل اخي

بس عندي ملاحظة انت ليش مسوي استعلم على اسم و بشرط اسم هو اردي عندل ميتاج تسوي عملية استعلم لية انا قمبت بتبديله الى رقم الجوال

واثنين ما يحتاج انك تسوي تعديل على اسم يكفي رقم الجوال

PHP كود :
Dim m As String
        Dim SQLstr2 
As String "SELECT mob FROM student  WHERE  nam= '" & (TextBox2.Text) & "'"
        ' Dim da = New OleDbDataAdapter(SQLstr, con)

        If CON.State() Then CON.Close()
        CON.Open()
        Dim cmd As New OleDbCommand(SQLstr2, CON)
        Dim dr As OleDbDataReader
        dr = cmd.ExecuteReader()
        Dim b As String = ""
        If dr.Read() = True Then
            m = dr.Item(0).ToString
            CON.Close()
        End If
        If TextBox2.Text = m Then
            MsgBox(" هذه الحالة مسجلة قبل ذلك  ", , "رسالة")
           
            Exit Sub
        End If
        Try
            Dim SavInto1 As New OleDb.OleDbCommand
            Dim Conn As New OleDbConnection(conStr)
            SavInto1.Connection = Conn
            SavInto1.CommandType = CommandType.Text
            '
SavInto1.CommandText "UPDATE student set nam ='" Trim(TextBox2.Text) & "', mob ='" Trim(TextBox3.Text) & "' where id = " TextBox1.Text " "
            
SavInto1.CommandText "UPDATE student set  mob ='" Trim(TextBox3.Text) & "' where id = " TextBox1.Text " "
            
Conn.Open()
            
SavInto1.ExecuteNonQuery()
            
Conn.Close()
            
MsgBox("تم التعديل بالنجاح", , "رسالة")
            
Me.Refresh()
            
'    m()
            mov()
        Catch ex As Exception
        End Try 
الرد }}}}
تم الشكر بواسطة:
#5
اسف اخي

لم انتبه الى كلمك

لمذا لا تستخدم خصيت Enabled في TextBox2

Form1_Load

TextBox2.Enabled = False

في Button جديد ضع
TextBox2.Enabled = True

و في Button حفظ ضع

TextBox2.Enabled = False

اتمى ان يكون هذا طلبك
الرد }}}}
تم الشكر بواسطة:
#6
اخي انت مركز معانا
ما بيتكرر مرتين بالنسبة للتعديل الي عملناه على زر التعديل
بيتكرر اذا عملت التعديل على زر الحفظ فقط

انت اشتغل على زر التعديل فقط بالطريقة الي اعطيناك اياه جربها طيب Angry
{وَلَنَبْلُوَنَّكُمْ حَتَّى نَعْلَمَ الْمُجَاهِدِينَ مِنْكُمْ وَالصَّابِرِينَ وَنَبْلُوَ أَخْبَارَكُمْ} [محمد: 31].

الرد }}}}
تم الشكر بواسطة:
#7
(03-06-14, 01:14 PM)عابر سبيل كتب : اخي انت مركز معانا
ما بيتكرر مرتين بالنسبة للتعديل الي عملناه على زر التعديل
بيتكرر اذا عملت التعديل على زر الحفظ فقط

انت اشتغل على زر التعديل فقط بالطريقة الي اعطيناك اياه جربها طيب Angry


هو قصدة على ما اعتقد انا يمكن الى المستخدم تعديل على TextBox الخاص الي فية اسم المستخدم لانة هو في عملية التعديل يقوم بتعديل اسم و رقم مع بعض و يقول انا اتعديل فية خطا انا متكد انه لم يقوم بتجربة الكود
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد كود يسمح با التعديل والكتابة علي اخر سطر من DataGridView دون باقي السطور ahmedbezia 4 96 28-11-17, 04:43 PM
آخر رد: ahmedbezia
Star [سؤال] اريد مساعدة في التعديل على مشروع ابو اياد@ 4 185 13-11-17, 12:31 AM
آخر رد: Amir_alzubidy
  [VB.NET] كيف يمكن حل مشكلة التعديل و التحديث و الحذف larbihamri 2 118 04-11-17, 08:45 PM
آخر رد: larbihamri
  سؤال عن تحديث البرنامج بعد التعديل طـلال 1 76 28-10-17, 10:02 PM
آخر رد: sendbad100
  [VB.NET] مطلوب التعديل علي الكود التالي محمد اسماعيل 2 109 11-10-17, 01:08 PM
آخر رد: محمد اسماعيل
  [VB.NET] التعديل على الكود - رقم التسلسلي dubai.eig 4 174 08-10-17, 11:30 PM
آخر رد: dubai.eig
  [VB.NET] اريد التعديل علي المديول التالي محمد اسماعيل 2 97 08-10-17, 07:37 PM
آخر رد: محمد اسماعيل
  تسمية زرار الداتا قريد فيو ..؟ طـلال 2 86 28-09-17, 12:48 AM
آخر رد: طـلال
  [VB.NET] التعديل على الكود ليتناسق ما اريده 0theghost0 4 182 17-09-17, 03:35 PM
آخر رد: 0theghost0
  [VB.NET] لدي مشكلة مع كود التعديل 0theghost0 13 269 09-09-17, 05:24 PM
آخر رد: ola

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


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