حماية البيانات المدخلة من الحذف و التعديل

[ابوعبدالله_1972]

اخواني السادة الكرام منتدي افسينا 

السلام عليكم و رحمته الله و بركاته ,,

ارجو من الله ان تكون بصحة و عافية .. 

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

Database3.accdb

 

Database3.rar

تم تعديل أكتوبر 8, 2020 بواسطه ابوعبدالله_1972

[محمد أبوعبدالله]

وعليكم السلام ورحمة الله وبركاته

تفضل اخي الكريم

تم تعديل اسم مربع تحرير وسرد الى Combobox1

وتم تعديل النموذج الفرعي الى subform1

ثم استخدمنا الكود التالي

Private Sub Combobox1_Click()
        If Me.Combobox1.Value = "نعم" Then
            Me.subform1.Form.AllowEdits = True
            Me.subform1.Form.AllowAdditions = True
        Else
        If Me.Combobox1.Value = "لا" Then
            Me.subform1.Form.AllowEdits = False
            Me.subform1.Form.AllowAdditions = False
        End If
        End If

End Sub

Private Sub Form_Current()
    Combobox1_Click
End Sub

Database3_3.rar

تحياتي

[ابوعبدالله_1972]

شكرا بارك الله فيك ... ممكن اذا سمحت تكون الاجابة بدون اكواد ... اذا سمحت ... وشكرا

[محمد أبوعبدالله]

1 دقيقه مضت, ابوعبدالله_1972 said:

ممكن اذا سمحت تكون الاجابة بدون اكواد

وضح بارك الله فيك

لم افهمك جيداً

تحياتي

[ابوعبدالله_1972]

تكون باوامر الماكرو او التنسيق الشرطي 

[محمد أبوعبدالله]

35 دقائق مضت, ابوعبدالله_1972 said:

التنسيق الشرطي 

التنسيق الشرطي لا يقوم بهذه الوظيفة

36 دقائق مضت, ابوعبدالله_1972 said:

تكون باوامر الماكرو

ما المشكلة اخذ مع الكود ؟ علماً انه ابسط واسهل كما يمكنك نقله الى اي برنامج نسخ ولصق

تحياتي

[ابوعبدالله_1972]

عشان وضع البرنامج داخل شبكة العمل ... و شبكة العمل لاتقبل اكواد و يتعرف عليه بانها فيروس .. وشكر