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

دي كود البحث الي انا شغال بيه
الكود ضعيف سهل اختراقة لو فيه كود اقوي
     Dim sql_PSS = "SELECT BMW.N_name, BMW.pss_name, BMW.inn FROM BMW where BMW.pss_name='" & TextBox1.Text & "'"
            Dim addPSS As New OleDb.OleDbDataAdapter(sql_PSS, conn)
            Dim SEt_PSS As New DataSet
            addPSS.Fill(SEt_PSS, "BMW")
        If SEt_PSS.Tables("BMW").Rows.Count = 0 Then
            TextBox1.Text = ""
            MsgBox("كلمة السر غير صحيحة برجاء ادخال كلمة السر", MsgBoxStyle.OkOnly, "تحذير")
            TextBox1.Focus()
            Exit Sub
        Else
            MDIform.Timer1.Enabled = True
                Me.Close()
        End If

استخدم البارامترات في الاستعلام بدل استخدام النصوص مباشرة
ابحث في المنتدى توجد امثلة كثيرة

(17-01-21, 09:30 AM)moosa_alabri كتب : [ -> ]استخدم البارامترات في الاستعلام بدل استخدام النصوص مباشرة
ابحث في المنتدى توجد امثلة كثيرة

اشكرك شكرا جزيل علي الاهتمام و الرد
لم اجد مثال واضح لهذا الموضوع

---

(18-01-21, 02:23 PM)السندبااد كتب : [ -> ]http://vb4arb.com/vb/showthread.php?tid=36486

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

إقتباس :برجاء مثال لطريقة البحث بالباروميتر

اخي الكريم اغلب امثلتي الاخيرة بطريقة البارمترات مثل
وهكذا

مثال عن الاجراءات المخزنة

اما البارمترات كل امثلي منذ اربع او خمس اعوام  بواسطتها ونادرا استخدم DataRow