اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

لدي مشكلة في سيرفر  بعدما  وضعت قاعدة البياتات اول شئ

مشكلة هي انا عندي نظام صلحيات في قاعدة بيانات هذا  نظام مخصص لكل  مدير يتحكم في قاعدة بيانات لكي يعطي صلحيات دخول للقاعدة بيانات بعدما يسجل مستخدم جديد يكلم مديره يعطيه صلحيات دخول   يعني عندي  القاعدة متكونة 8 جداول مفرقة  كل جدول  مخصص لمدينة وكل مدينة لاتتستطيع ان ترى جدول  مدينة ثانية  لانها  مخصصة لــــ 8 مدن  لان شركة لديها فروع في 8 مدن يعني بعد وضع قاعدة في سيرفر فهمت انو  8 مدن كلما  يسجلو كامستخدمين  جدد و مستخدم اذا راسل  مدير  عشان يعطيه صلحيات دخول راح يلاقي  مستخدمين كثير تبع 8 مدن اريد حلا لكي المدير   يشوف المستخدمين تبع مدينة 1 مش تبع 8 مدن مثلا لو سجل مستخدم 1 بمدينة فلانية مدير راح يلاقي المستخدم التابع لمدينته  فقط  عشان يعطيه صلحيات دخول 

حاليا  مشكلة لانها في سيرفر  8 مدن كلهم اذا سجلو  راح يطلع  اسمائهم  في جدول صلحيات  اريد حلا لكي يصبح من يسجل في مدينته يطلع في جدول  تبع مدينة ذيك فقط مايطلع لي  تبع 8 مدن في جدول  1 هل من طريقة او كود  او شئ  اتمني  افادتي بحل  او  طريقة  صورة توضيحية 

dffd.png

  • Like 1
قام بنشر

وعليكم السلام:smile:

 

الظاهر من كلامك انك محتاج تصفية لكل مدينه ، والافضل ان تتم التصفية من الاستعلام ، بحيث لما يدخل المدير في النموذج ، تلقائيا يقوم النموذج بتصفية بيانات النموذج حسب مدينته:smile:

 

جعفر

  • Like 1
قام بنشر
1 دقيقه مضت, jjafferr said:

وعليكم السلام:smile:

 

الظاهر من كلامك انك محتاج تصفية لكل مدينه ، والافضل ان تتم التصفية من الاستعلام ، بحيث لما يدخل المدير في النموذج ، تلقائيا يقوم النموذج بتصفية بيانات النموذج حسب مدينته:smile:

 

جعفر

هذه صورة توضيحية 

dffd.png

قام بنشر
1 دقيقه مضت, jjafferr said:

هذا مثال

 

جعفر

الف  شكر يا استاذ هل  يمكن ان ارسل لك ملف مصغر  ان تضع لي  حلا  لهذه عملية واكون شاكرا لك  واذا  لم تستطع فسأكون شاكرا لك لانك  قمت بالرد علي  

قام بنشر

نعم تفضل ، ولكن رجاء اعطاء تفصيل عن اسم النموذج وما الذي يجب ان يصير ، بمثال ، حتى اتتبع المثال ونوصل الىنتيجة:smile:

  • Like 1
قام بنشر
الان, jjafferr said:

نعم تفضل ، ولكن رجاء اعطاء تفصيل عن اسم النموذج وما الذي يجب ان يصير ، بمثال ، حتى اتتبع المثال ونوصل الىنتيجة:smile:

يب اكيد يا استاذ 

قام بنشر
55 دقائق مضت, jjafferr said:

نعم تفضل ، ولكن رجاء اعطاء تفصيل عن اسم النموذج وما الذي يجب ان يصير ، بمثال ، حتى اتتبع المثال ونوصل الىنتيجة:smile:

استاذ ممكن سؤال  هل  يمكن قبل تعديلها  طرح سؤال  هل يمكنك  مثلا قبل  اعطاء  نسخ لكل  مدينة  يعني تبقي  عندي نسخة اشاهد كل مستخدمين تبع المدن 8 عندما  يسجلون  لكن المدن  يشاهدون  المستخدمين  تبع مدنهم فقط مايشهدون كل  المستخدمين مثلي  يعني  مدير  المدينة 1 يشاهدة مستخدمين تبع المدينة  1 فقط وتبع المدينة 2 يشاهد تبع 2 فقط  و  3 و 4  5  6  7 8 الخ لكن انا  فقط اشاهد كل  مستخدمين تبع  8 مدن 

قام بنشر
3 ساعات مضت, sofiane05552 said:

استاذ ممكن سؤال  هل  يمكن قبل تعديلها  طرح سؤال  هل يمكنك  مثلا قبل  اعطاء  نسخ لكل  مدينة  يعني تبقي  عندي نسخة اشاهد كل مستخدمين تبع المدن 8 عندما  يسجلون  لكن المدن  يشاهدون  المستخدمين  تبع مدنهم فقط مايشهدون كل  المستخدمين مثلي  يعني  مدير  المدينة 1 يشاهدة مستخدمين تبع المدينة  1 فقط وتبع المدينة 2 يشاهد تبع 2 فقط  و  3 و 4  5  6  7 8 الخ لكن انا  فقط اشاهد كل  مستخدمين تبع  8 مدن 

1. اساس الموضوع ، انك تعمل معيار "اسم المدينة" في الاستعلام الذي يفتح نموذج اعطاء الصلاحيات ،

2. بينما لك انت ، فتحذف المعيار من الاستعلام ، فترى جميع المدن.

 

جعفر

  • Like 1
قام بنشر (معدل)
39 دقائق مضت, jjafferr said:

1. اساس الموضوع ، انك تعمل معيار "اسم المدينة" في الاستعلام الذي يفتح نموذج اعطاء الصلاحيات ،

2. بينما لك انت ، فتحذف المعيار من الاستعلام ، فترى جميع المدن.

 

جعفر

عندما اضعها في سيرفر  راح اصير اشوف  كل  مستخدمين الجدد في  الجدول عندما يسجلون لان ميزة  السيرفر  تخلي بيانات مشتركة بين 8 مدن انا اريد  طريقة او شئ  تخلي  صلحيات المدير الي تعطي  صلجيات الدخول للمستخدم ماتكون مشتركة يعني مش  كل  8 مدن يشوفون المستخدمين تبع المدن اخري  ابي  كل  مدينة  تشوف  مشتخدمين تبعها في  صلحيات المدير  يعني المدير عنده اسم دخول  ورقم سري  خاص به يلاقي  فيه قائمة المستخدمين الجدد الي يبي يعطيه صلحيات دخول  يسوي عليه علامة صح انا ابيه مايشوف  المستخدمين تبع المدن اخري يشوف تبع مدينته  فقط لان مشكلتي في سيرفر  عندما  وضعتها  اذ سجلواا كل العاملين حاليا الي هم في  8 ولايات المدير يشوف   كل  مستخدمين دفعة 1 في جدول  يعني ماتقدر تعرف مين معاك ومين لا  بخصوص اسماء المدن  8    

                               COM /CBR /GPL /Branches / Centres Bitumes / Centre de Formation /Direction Générale  / UDM

بخصوص  ردك الحلو

------------------------------------------------------------------------------------------------------------------------

1. اساس الموضوع ، انك تعمل معيار "اسم المدينة" في الاستعلام الذي يفتح نموذج اعطاء الصلاحيات ،

2. بينما لك انت ، فتحذف المعيار من الاستعلام ، فترى جميع المدن.

--------------------------------------------------------------------------------------------------------------------------

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

تم تعديل بواسطه sofiane05552
قام بنشر
2 دقائق مضت, sofiane05552 said:

 

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

نعم

  • Like 1
قام بنشر

وعليكم السلام:smile:

 

في نموذج Login ، نريد ان نحتفظ باسم المستخدم في متغير

709.Clipboard01.jpg.785855a230b9c4b06e5539c0c21a88a2.jpg

.

وفي النموذج Form01 كلما اردت ان تفتح النموذج admin ، فيجب ان تنادي الوحدة النمطية لكي تفتحه لك باسم المستخدم الصحيح ، او Sofiane

709.Clipboard02.jpg.bfbca698f381fdbea317df770aef2cbd.jpg

.

وهذه هي الوحدة النمطية التي تعمل مصدر بيانات للنموذج admin ، وتفتحه:

Option Compare Database

Public Current_User As String
Public frm_RecordSource As String
'

Public Function Get_User()

    Get_User = Current_User
End Function

Function Get_City() As String

    Get_City = Current_City
End Function

Function Current_City() As String
On Error GoTo err_Current_City
    
    Dim x() As String
    
    City = DLookup("[COM] & '|' & [CBR] & '|' & [GPL] & '|' & [Branches] & '|' & [Centres Bitumes] & '|' & [Centre de Formation] & '|' & [Direction Générale] & '|' & [UDM] & '|' & [admin]", "users", "[username]='" & Current_User & "'")
    
    x = Split(City, "|")

    'which city
    If x(0) = True Then
        Current_City = "COM"
        
    ElseIf x(1) = True Then
        Current_City = "CBR"
    
    ElseIf x(2) = True Then
        Current_City = "GPL"
        
    ElseIf x(3) = True Then
        Current_City = "Branches"
        
    ElseIf x(4) = True Then
        Current_City = "Centres Bitumes"
        
    ElseIf x(5) = True Then
        Current_City = "Centre de Formation"
        
    ElseIf x(6) = True Then
        Current_City = "Direction Générale"
        
    ElseIf x(7) = True Then
        Current_City = "UDM"
        
    ElseIf x(8) = True Then
        Current_City = "Admin"
        
    End If
    
    'Mr sofiane is exempted
    If Current_User = "sofiane" Then
        Current_City = ""
        frm_RecordSource = "SELECT * FROM users"
    Else
    
        frm_RecordSource = "SELECT username, password, admin, [" & Current_City & "] FROM users Where [" & Current_City & "]= True"
    End If
    'Debug.Print frm_RecordSource
    
Exit_Current_City:

    DoCmd.OpenForm "admin"
    Forms!admin.RecordSource = frm_RecordSource
    
    
Exit Function
err_Current_City:

    If Err.Number = 94 And Current_User = "sofiane" Then
        Current_City = ""
        frm_RecordSource = "SELECT * FROM users"
        Resume Exit_Current_City
        
    Else
        MsgBox Err.Number & vbCrLf & Err.Description
    End If
    
End Function

 

جعفر

709.Database4.mdb.zip

  • Like 1
قام بنشر

استاذ جعفر  مشكور  علي  ردك المبدع وجزاك الله خيرا على مساعدتي  و اريد ان اقول لك مستخدمين  الموجودين داخل زر اوك  الي  هم في صورة  ذي  المستخدم اول لا يوجد فيه منفعة راح احذفه  بخصوص  مستخدم 2 يفتح الشيفت   في موضوع تبعك مافهمت ايش يقصد في كود  اسم sofiane وش  مهمته او  ايش  معناه  سجلت بعض المستخدمين  الجدد عندما دخلت ادمين لم اجدهم كمان انحذفو من جدول  مدري ليش اظن فكرة لسا مفهمته انا  كويس  هل  يمكنك يااستاذ مساعدتي في فهم الفكرة 

709.Clipboard01.jpg.785855a230b9c4b06e5539c0c21a88a2.jpg

قام بنشر

ما فهمت قصدك ابدا:blink:

رجاء اكتب الملاحظات كأرقام 1 و 2 ... ، 

ورجاء اعطني مثال عن اللي تتكلم عنه.

 

جعفر

  • Like 1
قام بنشر (معدل)
5 دقائق مضت, jjafferr said:

ما فهمت قصدك ابدا:blink:

رجاء اكتب الملاحظات كأرقام 1 و 2 ... ، 

ورجاء اعطني مثال عن اللي تتكلم عنه.

 

جعفر

End If
    
    'Mr sofiane is exempted
    If Current_User = "sofiane" Then
        Current_City = ""
        frm_RecordSource = "SELECT * FROM users"
    Else 

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

تم تعديل بواسطه sofiane05552
قام بنشر
9 دقائق مضت, sofiane05552 said:

End If
    
    'Mr sofiane is exempted
    If Current_User = "sofiane" Then
        Current_City = ""
        frm_RecordSource = "SELECT * FROM users"
    Else 

1. في كود ذا مافهمت ليه  لاسم ذا  مكتوب  هون قصدي  ايش  مهمته  sofiane

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

1. انت قلت تريد ان تكون عندك صلاحية النظر في جميع المدن ، فكتبت اسمك Sofiane ،

يعني لما انت تدخل في البرنامج باسمك وكلمة السر ، ثم تفتح النموذج Admin ، سترى جميع المدن.

 

اما بالنسبة لباقي اللي انت كتبته ، فوالله لم افهم شيء من جملتك/تعبيرك ، والله ، وطلبت منك 

18 دقائق مضت, jjafferr said:

ما فهمت قصدك ابدا:blink:

رجاء اكتب الملاحظات كأرقام 1 و 2 ... ، 

ورجاء اعطني مثال عن اللي تتكلم عنه.

رجاء ، رجاء 

 

جعفر

  • Like 1
قام بنشر
12 دقائق مضت, jjafferr said:

1. انت قلت تريد ان تكون عندك صلاحية النظر في جميع المدن ، فكتبت اسمك Sofiane ،

يعني لما انت تدخل في البرنامج باسمك وكلمة السر ، ثم تفتح النموذج Admin ، سترى جميع المدن.

 

اما بالنسبة لباقي اللي انت كتبته ، فوالله لم افهم شيء من جملتك/تعبيرك ، والله ، وطلبت منك 

رجاء ، رجاء 

 

جعفر

انا جزائري  وللغتنا  مخربطة ههههه يعني  اتعذب  عشان اسوي  تعبير صحيح  لاتلومني  ان شاء الله ماتتعذب معي  مشكلة انا سجلت اسم sofiane سويت باس 123 زي ماقلت لي  رحت ادخل على admin   جاتني رسالة تقول ليس لدي صلحيات وبعدين دخلت للجدول سويت كل علامات صح علي  اسمي  عشان يكون معي صلحيات رحت اجرب ادخل علي admin  طلعت لي رسالة  ذي  الي بصورة 

45.png

قام بنشر

انا لا اعرف اذا انت حذفت شيء من البرنامج ، وعملت فيه خلل!!

ولكن ، اليك هذه الصور من البرنامج الذي ارفقته انا في مشاركتي اعلاه:

709.Clipboard03.jpg.316b7bac2b65aad1fb5dfea433303cb1.jpg

.

709.Clipboard04.jpg.55c6c440056e31a1ac4377d031f803cf.jpg

.

709.Clipboard05.jpg.e8d08e6cf5bee4e7c3223124b2d5a619.jpg

.

709.Clipboard06.jpg.9c8e21968ff5c4162826b0dae128d26f.jpg

.

يعني شغال تمام:smile:

 

جعفر

  • Like 1
قام بنشر

هههههه بارك الله فيك يا أستــــــــاذ لأن فهمت الشغل  ولله اسف  تعبتك معي ماكنت فاهم شغل  كيف  لكن لحين فهمت كل شئ  من خلال صورة الي ارسلتها لي

 لكل مبدع إنجاز ولكل شكر قصيدة ولكل مقام مقال، ولكل نجاح شكر وتقدير، فجزيل الشكر أهديك  ورب العرش يحميك 

شكراً لك من أعماق قلبي


 

قام بنشر (معدل)
2 ساعات مضت, jjafferr said:

حياك الله:smile:

أستاذ اسف  اذا ازعجتك معي بخصوص  نظام صلحيات جربته لأن  لادمين Sofiane الي يمثل كل ولايات  معاه كل صلحيات يشوف كل  مستخدمين  عندما  يسجلون في برنامج  هنا طريقة كويسة في مرحلة ذي لكن مشكلة Admin  اخرون 1-2-3-4-5-6-7-8  تبع المدن 8 الي  يشوفون مستخدمين تبع مدنهم فقط مش زي sofiane يشوفون كلشئ ابي  مثل  طريقة sofiane  في مدن من 1 الي 8 يعني رقم 1 يشوف المستخدمين الي  مسجلين في رقم 1 مايقدر يشوف المستخدمين تبع الرقم 2  المقصود واحد مايشوف ثاني بس sofiane  الي يشوف  كلشئ هنا ماعرفت كيف جربت سجلت مستخدم جديد ماعرفت كيف  اخليه مثلا يطلع في  مدينة 1 او 2 او 3 او  4او  5او  6 او 7او 8 

تم تعديل بواسطه sofiane05552

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information