تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] قفل بوتن بكلمة سر
#1
عندي بمشروعي زر اضافة وحذف وتعديل
كيف بقدر ماحد يلعب بقاعدة البيانات عندي عن طريقة اضافة او حذف او تعديل على المعلومات الموجودة بها
اي يكون له صلاحية الاطلاع على البيانات للعملاء وليس له التلاعب بها او العبث عن طريق اضافة او عديل او حذف
طبعا اقصد من البرنامج لان قاعدة البيانات التابعة للبرنامج محمية بكلمة مرور
شكرا
الرد }}}
تم الشكر بواسطة: bidaya
#2
ابسط مثال للتصاريح
الرد }}}
#3
السّلام عليكم و رحمة الله و بركاته
إضافة لما تكرّم به أستاذنا الكريم " عاصم شاهين " بارك الله فيه و في أستاذنا الغائب عن عيوننا .. الحاضر بقلوبنا " سعود "
باعتبار أنّ العبارة : Name_Users .. متغيّر عام لجلب اسم المستخدم
باعتبار أنّ مدير النظام يأخذ دومًا السجل الأول بجدول المستخدمين
يمكن تكرار نفس الكود مع جميع الأزرار التي تراها ضرورية لطلبك
تحياتي
كود :
   Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
       Using can_edit As New SqlCommand("SELECT COUNT(USERS_Id) From TBL_USERS Where USERS_Name='" & Name_Users & "' And USERS_Id=1", Conne_2019)
           If Conne_2019.State = ConnectionState.Closed Then
               Conne_2019.Open()
           End If
           If can_edit.ExecuteScalar > 1 Then
               MessageBox.Show("عفواً  ..  غير مصرّح لك بعمليات تعديل البيانات لتنفيذ هذا الأمر  !!؟؟", "تصريح التعديل", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign)
               Exit Sub
           Else
               If Me.TxtItemId.Text = vbNullString Then
                   MessageBox.Show("عفواً  ..  الرّجاء إختيار تسمية الصنف  ..   لا توجد بيانات لتنفيذ أمر التّعديل  !!؟؟", "تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign)
                   Conne_2019.Close()
               ElseIf MessageBox.Show("  هل أنت متأكّد من أنّك تريد تعديل بيانات هذا الصنف :  " & Me.TxtItemName.Text & "  ? ", "تنبيه", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2, MessageBoxOptions.RightAlign) = Windows.Forms.DialogResult.Yes Then
                   Call Modifier_Cancel_Button()
                   Me.TxtItemId.Enabled = False
               End If
           End If
       End Using
   End Sub

قناتنا على اليوتوب
الرد }}}
تم الشكر بواسطة: asemshahen5 , EMADSSS , EMADSSS , أبووسم , أبووسم , bidaya , 3booody
#4
شكرا اخي الكريم
الرد }}}
تم الشكر بواسطة: عبد العزيز البسكري , asemshahen5 , bidaya


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] جملة اتصال بملف اكسيل ٢٠٠٣ بكلمة مرور Mr.H 3 70 منذ 10 ساعة مضت
آخر رد: Amir_Alzubidy
  فتح قاعدة البيانات المحمية بكلمة مرور عن طريق الفيجوال بيسك Tajaldeen 1 658 07-03-23, 08:59 AM
آخر رد: Taha Okla
  [VB.NET] راديو بوتن & شيك بوكس الزويي 2 499 19-01-23, 05:25 PM
آخر رد: الزويي
  كيفية انشاء برنامج بكلمة سر crazykinko 7 1,003 08-11-22, 12:12 PM
آخر رد: crazykinko
  [VB.NET] مشكلة اضافة بوتن لكل خلية بالداتاجريد فيو محمد اسماعيل 5 2,167 30-06-22, 08:29 PM
آخر رد: alessam4pro
  أريد كود يعمل عمل لصق للنص Past عند الضغط علي زر بوتن ؟ DanyGhost2010 2 4,181 29-12-21, 10:56 AM
آخر رد: سعود
  [سؤال] نص اتصال قاعدة sqlite بكلمة المرور princelovelorn 8 3,859 18-10-19, 02:08 AM
آخر رد: اللورد محمود
  محتاج مساعدة على التعديل على بوتن Mohamed Magdy 0 987 23-08-19, 07:03 PM
آخر رد: Mohamed Magdy
  قفل مجلد بكلمة سر برمجيا bidaya 3 2,205 28-05-18, 07:12 PM
آخر رد: elgokr
  [سؤال] اريد كيفية الضغط علي انواع الاصناف تظهر الاصناف علي شكل بوتن wweecw 3 1,872 19-05-18, 07:56 PM
آخر رد: wweecw

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


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