إعلان

Collapse
No announcement yet.

لا اريد التكرار في قاعدة البيانات

Collapse
X
  • تصفية
  • الوقت
  • عرض
مسح الكل
مشاركات جديدة

    لا اريد التكرار في قاعدة البيانات

    اخواني السلام عليكم
    مشكلتي هي تكرار رقم السجل المدني

    علماً ان عملية الربط عندي باستخدام Adodc
    ارجو مساعدتي بعدم تكرار السجل المدني وعند محاولة تكرارة اريد ظهور رسالة انه موجود وكذلك احضار السجل

    الف الف شكر لكم جميعاً

    #2
    السلام عليكم
    ضع يا اخى الفاضل هذه الاكواد و لكن ينبغى لك ان تستخدم بيانات جديدة لانك فعلا كررت فى قاعدة البيانات ثم بعد ذلك ادعوا لاخيك فأنى مبتلى بأبتلاء شديد و الحمد لله يمنعنى من عملى و على حقوق و واجبات فأحتاج للدعاء الصادق
    Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyPress = 13 Then
    Adodc1.CommandType = adCmdText
    Adodc1.RecordSource = "Select *from[tabel] where tabel.no like " & Text1 & " order by no"
    Adodc1.*******
    If Adodc1.Recordset.RecordCount = 1 Then
    MsgBox "The Number is found"
    Exit Sub
    End If
    End Sub

    Private Sub Text1_LostFocus()
    Adodc1.CommandType = adCmdText
    Adodc1.RecordSource = "Select *from[tabel] where tabel.no like " & Text1 & " order by no"
    Adodc1.*******
    If Adodc1.Recordset.RecordCount = 1 Then
    MsgBox "The Number is found"
    Exit Sub
    End If
    End Sub

    تعليق


      #3
      اللهم اني دعوتك كما امرتني فاستجب لي كما وعدتني

      اللهم ارفع البلاء والداء عن اخي ومتعة بالصحة والعافية

      وارضى عنا وعنه واغفر لنا وله

      أمين


      الف الف شكر لك اخي

      تعليق


        #4
        مر عضو الغلابة من هنا
        و ما كان لي ان امر الا و ادعوها

        اللهم اني دعوتك كما امرتني فاستجب لي كما وعدتني

        اللهم ارفع البلاء والداء عن اخي ومتعة بالصحة والعافية

        وارضى عنا وعنه واغفر لنا وله

        أمين

        تعليق


          #5
          اللهم اعفو عنه واغنيه من فضللك عن من هو سواك

          تعليق

          تنفيذ...
          X