[المبرمج العبقري]

السلام عليكم
كنت اريد يا اخواني
كود الحذف من قاعدة البيانات بواسطة كلمة سر

[محمود بكرى]

اخى انشي مربع نص textbox واجعل خاصية passworld =true
نفرض انك لديك جدول 1 به الاسم و الوظيفة والكود وتريد حذف الشخص الذى كوده 10 
كل ما عليك ان تضع متغير نسميه passmode مثلا ونضع فيه كلمة السر مثلا 123
قبل الحذف سوف تدخل كلمة السر فى مربع النص ولو مطابقة لقيمة المتغير يقوم بالحذف لو غير مطابقة يلغى العملية
الكود

PHP كود :

الباسورد  dim st as string="123"
if textbox1.text=st then
جملة الاستعلام فقط طبعا كمل الاتصال والامر لتفيذها   "delete * from table1 where id=10"
else
msgbox("كلمة السر خاطئة")
end if 


اخى وضعت جملة الاستعلام فقط للتوضيح ولاكن يلزمك نص اتصال واجراء لتفيذها

[السرور]

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

[hglogtd]

كود :

Dim value As String
       value = InputBox("صلاحية خاصة", "الحذف", "ادخل الرقم السري")

       If value = "123" Then



       BindingSource.RemoveCurrent()





       Else

           MsgBox("الرقم خطأ", vbOKOnly + vbCritical, "تحذير")

       End If

   End Sub

مشاركة

[المبرمج العبقري]

(23-11-16, 12:37 AM)hglogtd كتب :

كود :

Dim value As String
       value = InputBox("صلاحية خاصة", "الحذف", "ادخل الرقم السري")

       If value = "123" Then



       BindingSource.RemoveCurrent()





       Else

           MsgBox("الرقم خطأ", vbOKOnly + vbCritical, "تحذير")

       End If

   End Sub

مشاركة

شكرا جزيلا

[hglogtd]

العفو والبركة في العباقرة اللي في هالمنتدى