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

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

قام بنشر

الأخوة المحترفين :

أرجو المساعدة منكم يا أخواني الأعزاء أنا عملت مشروع لحفظ الوثائق وادخال البيانات اليومية على قاعدة اكسس ، وهناك الكثير من الزميلات اللاتي يستخدم هذا المشروع وأريد أن اضع لكل واحدة صلاحيات خاصة واسم وكلمة مرور ،،، ارجو منكم المساعدة ولكم مني الدعاء في الغيب ،،، ولا تنسوا أن الله كان في عون العبد ما كان العبد في عون أخيه

  • Like 1
قام بنشر

الأخ العزيز التقني والأخ العزيز RUDWAN :

أولاً مشكورة على ردودكم والمساعدة ، بس بالنسبة للبرنامج اللي يصنع الصلاحيات فهو جيد جداً بس المشكلة هي أنني عند البداية تطلع لي رسالة تقول أنه ليس لدي الصلاحية لفتح هذا النموذج لا أعرف ماهو النموذج المقصود لأنني لم أترك أي نموذج أثناء التحميل وبعد الضغط على OK تطلع شاشة الاسم وكلمة المرور ، المسألة الثانية هي بعد ادخال كلمة المرور والاسم المفروض أن تفتح الشاشة الرئيسية عندي اللي أنا عملت لها AUTOEXEC MACRO وهي الشاشة الرئيسية في برنامج ، فلا تفتح هذه الشاشة أنما تفتح قاعدة البيانات الخلف ،( أي الجداول والاستعلامات والنماذج إلخ) فأرجو أن تكملوا معروفكم وتساعدوني في حل هذه المشكلة ،،،

قام بنشر

أ ي نموذج تقصدين لم يفتح معك , هل نموذج برنامج الصلاحيات أم نموذج في ملفك ؟

ثانيا :برنامج الصلاحيات يقوم بوضع نموذج الدخول كنموذج افتتاحي ,و يلغي عمل ماكان قبله

و لذلك يمكنك تعديل ماكرو التشغيل ليكون نموذج الشاشه الرئيسيه عندك بعد نموذج ادخال كلمة السر و اسم المستخدم

قام بنشر

عزيزي rudwan :

شكراً على تواصلك الجميل أخي ، أنا لا أعرف النموذج المقصود ولكن البرنامج يعطيني هذه الرسالة : 779689785b.jpg

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

قام بنشر

الآن فهمت المشكله :(

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

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

قام بنشر

الأخ : رضوان

تسملي لي يا غالي والله ما كنت أتوقع أنه في ناس مستعدة للمساعدة وعمل الخير مثلك، بس أقول الله يخليك ذخر لهذا الموقع الراقي والأخوة الأعضاء ،،، ومرة أخرى مشكورة عزيزي

قام بنشر

اخي رضوان :

لا نستغني عنكم أبداً ، أرجو أن لا تتضايق مني لكثرة أسئلتي ،

لقد قمت باستخدام البرنامج وكل شيء تمام والحمدلله ، ولكن المشكلة الصغيرة التي بقيت هي أنني بعد أن ادخل الى البرنامج وادخل الاسم وكلمة المرور تفتح لي قاعدة البيانات ولا تفتح لي الشاشة الافتاحية ، ec84696c06.jpg

ولك جزيل الشكر ،،،

قام بنشر

المنتدى للأسئله و الاجابه عليها , و المضايقه ليس لها مكان ههنا

لكن ارجو تزويدي بتفصيل ترتيب الماكرو الافتتاحي كيف يعمل

حيث ألاحظ أن شاشتك الافتتاحيه هي تقرير و ليس نموذج , مع العلم أن نظام الصلاحيات يحدد الصلاحيات للنماذج و ليس للتقارير

على كل حال يمكنك أن تضعي كود في نموذج الدخول ( اسم المستخدم و كلمة السر ) , حدث عند الاغلاق يفتح لك التقرير المطلوب

قام بنشر

الأخ العزيز : رضوان ،،،

أول أشكرك على اهتمامك بالموضوع ، أما بعد فقد بدأت استعمل النصيحة التي قدمتها لي بقولك (على كل حال يمكنك أن تضعي كود في نموذج الدخول ( اسم المستخدم و كلمة السر ) , حدث عند الاغلاق يفتح لك التقرير المطلوب ) عند النموذج المطلوب اللي هو الشاشة الرئيسية وفتح لي وبشكل ممتاز الحمد لله ، أما الآن فقد بقيت عندي جزئية بسيطة وهي كيف أعرف من هو المستخدم الذي قام بادخال المعلومة أو دخول أي من المستخدمين في أي وقت ومتى كان آخر وقت له في الخروج ،،، وجزاكم الله خيراً ،،، كنت أتمنى أن نتقابل في الماسنجر لكي نستفيد من خبرتك أكثر ولكن فضلت المنتدى حتى تعم الفائدة ،،، وشكراً

قام بنشر

الطريقه بسيطه و تعتمد على الفكره التاليه ,

نظام صلاحيات المستخدمين أنشأ لك جدول المستخدمين , تمام ؟

الان تضيفي حقل الى الجدول الذي تريدين حفظ اسم المستخدم فيه ( أي جدول من جداو ل القاعده ) , و تسميه اسم المستخدم , تمام ؟

الآن من النموذج , و بعد انتهاء عملية ادخال السجل , و قبل اغلاق النموذج نجعل النموذج يقوم بتعبئة حقل اسم المستخدم تلقائيا , كيف ؟ أرجو أن تستخدمي ذكائك في معرفتها .

me.user=dlookup("username","users")

الآن يصبح لديكي ف يالجدول اسم المستخدم اذلي قام بتخزين المعلومه محفوظا في الجدول و تستطيعن استعراضه من تقرير خاص لذلك .

أما تسجيل وقت الدخول و وقت الخروج :

نضيف الى جدول المستخدمين الحقلين : وقت الدخول ووقت الخروج

time in - time out

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

و عند خروج المستخدم , شاشة مختلفه , يقوم بتعبئة وقت الخروج

و أعتقد تستطيعين عملها بمفردك

قام بنشر

مع الأسف ما كنت اريد أن أخيب طنك بي ،،، لأنني لم استطع عمل شي ، فقد أضفت حقل (اسم المستخدم ) في جدول من جداول الصلاحيات وهو frms ولكن الباقي صار صعباً علي كثير والله وما نمت البارحة كلها سهرانه علشان اثبت ذكائي بس مع الأسف ما صار معي اي شيء ،،، أرجو التوضيح خطوة خطوة ، ثم ما هو النموذج المقصود في التعليق والسجل هل هما أي نموذج وأي سجل ولا ايش ،،، وأين أضع الكود المكتوب وكيف ، أسئلة كثيرة بس انتو قدها ،،، يا ريت خطوة خطوة علشان الفائدة وإلا راح أستحي بعد كده وما راح أسئل شيء ،،، وشكراً

قام بنشر

المشكلة الأخرى الأخي العزيز هي أنن عندما أعطي بعض المستخدمين صلاحية الاطلاع فقط وتطلع عليه رسالة (عفواً ليس لديك الصلاحية لفتح هذا النموذج) ويضغط ok ، بعدها تفتح مباشرة نافذة قاعدة البيانات ، وأنا لا أريد لمستخدمه أخرى غيري أن تستطيع دخول الجداول والاستعلامات إلخ ، وشكراً

قام بنشر (معدل)

الحل ليس باضافة حقل المستخدم على ا ي من جداول الصلاحيات !!!!!!

الجدول الذي تريدين أنتي معرفة اسم المتسخدم الذي قام بادخال المعلومه , لنفرض جدول الموظفين , يضاف حقلين لذلك الجدول : اسم المستخدم - تاريخ الادخال , و يمكن اضافة حقل آخر في حال الرغبة في معرفة من قام بالتعديل على السجل , اسم المستخدم الذي عدل .

الآن اذا كان لديكي نموذج الموظفين ( فرضا ) يضاف هذين الحقلين ( أو الثلاثه ) المستخدم الذي أنشأ السجل - وقت الانشاء - المستخدم الذي عدل - وقت التعديل ( اذا ممكن أربعة حقول اضافيه ) .

الآن ممكن اضافة الحدث التالي لتعبئة حقلي اسم المستخدم المنشأ للسجل , و تاريخ الانشاء

Private Sub Form_BeforeInsert(Cancel As Integer)
[CreatedBy] = dlookup("username","users") ()
[CreatedDate] = Now()
End Sub
و بذلك يتم تخزين كل من اسم المتسخدم المنشأ للسجل و تاريخ الانشاء الآن لنفرض نريد معرفة الذي قام بالتعديل و تاريخ التعديل , نضع الكود التالي :
Private Sub Form_BeforeUpdate(Cancel As Integer)
[ModifiedBy] = dlookup("username","users") ()
[ModifiedDate] = Now()
End Sub

أرجو المحاوله , و أنا واثق من نجاحك , و اذا فشلت لاتترددي في اعادة السؤال

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

تم تعديل بواسطه rudwan
قام بنشر

أخي العزيز ،

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

وبالنسبة لإخفاء صفحة البيانات من شريط أدوات الأكسس، لقد قمت بذلك ولكن المشكلة هي أنني لا أتمكن من استعادة شريط المعلومات ، وكيف اوقف عمل الزر F11 ثم استعيده عند الصيانة ،،، وألف ألف شكر

قام بنشر

الأخ : رضوان

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

أولاً أعتذر عن عدم ردي ومتابعتي للموضوع منذ فترة ، وذلك لسببين الأول وهو أنني كنت مزكمه فلم أذهب للدوام ، الثاني هو أنني تحديت نفسي في تعلم الكود وكيفية كتابته بعد أن رأيت أنه لابد من تعلمه ، وذلك صرت أقرأ وأقرأ وأبحث وقلت لنفسي لو لم أستطع أن اتوصل لشيء أعود إليك ، ولكن الحمد لله مع أنني لم أتوسل لكتابة كود واحد بس عرفت كيف أنسخ الكود وإلصقه (يعني وين أحطه) وكيف اذهب لفجوال بيسك وهكذا ، الحمدلله استطعت أن استخدم مثل هذا الكود ،

Private Sub Command98_Click()

Dim SQL As String

DoCmd.SetWarnings False

'On Error GoTo Err_Command98_Click

On Error Resume Next

SQL = "INSERT INTO UserLogs(DateLogs,TimeLogs,EventLogs,Username) VALUES(#" & _

Format(Now, "mm/dd/yyyy") & "#,#" & Format(Now, "hh:mm") & "#,'نموذج ادخال محضر','" & _

gUser & "')"

عملت جدول فيه اسم المستخدم وتاريخ الدخول وتاريخ الخروج ومكان الدخول ، والكود وضعته في حالة الحدث عند النقر في الزر الحفظ ،

أما بالنسبة للملف مع الأسف لم أستطع أن أحمله فلك ما احاول تطلع لي رسالة تقول

عفواً، لقد حدث خطأ ما. إذا لم تكن متأكداً من طريقة استخدام أي خاصية، أو لا تعرف سبب هذا الخطأ حاول البحث في ملفات المساعدة لمزيد من المعلومات

لقد حصل الخطأ التالي:

وهكذا ،،، على العموم نحن لا نستغني عنكم أبداً ،،، وشكراً

بقي لدي استفسار بسيط فأنا لم أستطع حتى الآن إيقاف عمل المفتاح f11 فما الحل ،،،

قام بنشر

حمدا لله على سلامتك , و مبروك توصلك للحل و هذا اجتهاد طيب

بالنسبه لتميل الملف فالظاهر أنك تحملينه بدون ضغط , و المنتجى لايقبل تحميل سوى الملفات المضغوطه

ثانيا : بالنسبه لالغاء المفتاح f11

لديك حل و هو الغاء خاصية استخدام المفاتيح من خيار بدء التشغيل , و استخدام قوائم مختصره بدلا من قائمه الأكسس المعروفه

و بذلك لن يتمكن أحد من استخدام المفاتيح المختصره مثل f11

قام بنشر

الله يسلمك يا أخي :

أولاً مشكورة على تواصلك معي ، ثانية لقد قمت بإلغاء جميع الخيارات من قائمة statup بدء التشغيل ومع الأسف الشديد أنني لم أستطع استعادة أي شيء من أجل التعديل أو عرض التصميم على أي نموذج فزر الفارة لا يعمل أبداً ، وأنا الآن محتارة لا أعرف كيف أعدل على شيء ، لا تخاف الحمدلله أنني احتفظ بنسخة منه ،،، أرجو السرعة في المساعدة ، هناك شيء آخر وهو كيف أستطيع أن أعرف الأخوة المتواجدين في المنتدى في وقت واحد ،،،

قام بنشر

هذا خطاي حيث نسيت أن أنبهك الى هذا الأمر

على العموم حل هذه المشكله يكمن في استخدام كود منع الشفت واستعادته

و هنا مثال على ذلك

يفتح الملف على نموذج بسيط , بالضغط على زر أمر يطلب ادخال كلمة سر

و هي هنا Rudwan

اذا كانت الكلمة صحيحه سيتم تفعيل مفتاح الشفت بعد اغلاق الملف , حيث يمكن عند اعادة فتح الملف باستخدام مفتاح الشفت أن يفتح صفحة البيانات

أما اذا كانت الكلمة خطأ فسيتم منع تفعيل مفتاح الشفت

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

بالنسبة للمنتدى يوجد في أسفل الصفحة الرئيسيه قائمة بالمتواجدون حاليا

CancelShift.rar

قام بنشر

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

فاتني ذكر اسمه و عذرا من صاحبه .

و قد أضفت على الملف كود تعطيل و الغاء الشفت

قام بنشر

آسفه نسيت ، ممكن كمان تفيدني في طريقة معرفة ما هو التعديل الذي قام به المستخدم ، فأنا لدي جدول فيه اسم المستخدم وتاريخ الدخول ومحل الدخول ، وذلك بعد أن يعمل حفظ لأي سجل يدخله ،،، بس ما أعرف كيف يمكن أن يعمل في حالة التعديل ،،، وليس الادخال الجديد،،، وشكر اً

قام بنشر

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

أما بالنسبه للتعديل , راجعي الكود الثاني الموجود في هذه المشاركه

http://www.officena.net/ib/index.php?showt...indpost&p=43901

و على العموم اذا لم تنجح التعديلات , سأحاول التواجد ان شاء الله غدا العاشره صباحا

لتجربة المثال و تطبيقه

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