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

مساعدة لعمل نظام توجيه للمستخدمين


Amr Ashraf
إذهب إلى أفضل إجابة Solved by أبو إبراهيم الغامدي,

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

السلام عليكم 

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

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

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

DoCmd.OpenForm "&Dlookup("[Wanted]","Table1")&", acNormal

لمزيد من الايضاح انظر المرفق اريد عند الضغط على زر الامر فى النموذج رقم 1 يفتح النموذج رقم 2 وذلك عن طريق كتابة اسم النموذج رقم 2 فى الجدول فى خانة Wanted

مرفق قاعدتين 2003 و 2010 جزاكم الله خير

 

 

 

 

Orientation.rar

رابط هذا التعليق
شارك

وعليكم السلام ورحمة الله
أنت بحاجة إلى وسيط ثالث يقوم بتحديد هوية المستخدم أولا حتى تتمكن من تطبيق الفكرة.
يمكن تحديد هوية المستخدم بأحد الطرق التالية:

* الطريقة التقليدية.. وهي عمل نموذج إدخال لهوية المستخدم وبعد ذلك تقوم بمطابقة هوية المستخدم مع الهوية في جدول التوجيه بالطريقة التالية

DoCmd.OpenForm Dlookup("[Wanted]","Table1",UserName='" & Me.UserName & "'"), acNormal

 

* الطريقة غير التقليدية.. وهي الاستفادة من هوية مستخدم ووندوز كوسيط للدحول، لكن هذه الطريقة تحتاج إلى أن تكون قاعدة البيانات في مجلد مشترك وفي بيئة متعددة المستخدمين، إما على جهاز واحد، أو أجهزة شبكية متعددة بالطريقة التالية

DoCmd.OpenForm Dlookup("[Wanted]","Table1",UserName='" & Environ("UserName") & "'"), acNormal

لتطبيق هذا الخيار بشكل أفضل يستحسن عمل وظيفة للقلاع مع الميكرو Autoexec

 

  • Like 2
رابط هذا التعليق
شارك

9 ساعات مضت, أبو إبراهيم الغامدي said:

وعليكم السلام ورحمة الله
أنت بحاجة إلى وسيط ثالث يقوم بتحديد هوية المستخدم أولا حتى تتمكن من تطبيق الفكرة.
يمكن تحديد هوية المستخدم بأحد الطرق التالية:

* الطريقة التقليدية.. وهي عمل نموذج إدخال لهوية المستخدم وبعد ذلك تقوم بمطابقة هوية المستخدم مع الهوية في جدول التوجيه بالطريقة التالية


DoCmd.OpenForm Dlookup("[Wanted]","Table1",UserName='" & Me.UserName & "'"), acNormal

 

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

رابط هذا التعليق
شارك

9 ساعات مضت, أبو إبراهيم الغامدي said:

لماذا تبحث في جدول Users!

من المفترض أن تبحث في Table1

 

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

تقبل تحياتى :fff:

 

رابط هذا التعليق
شارك

11 ساعات مضت, أبو إبراهيم الغامدي said:

جرب التعديل التالي وسوف تتضح الصورة لديك

اختر Admin أو A.Salah

UsersAutho.zip

وهو المطلوب جزاك الله خير على التطبيق الجميل للفكرة :fff:

رابط هذا التعليق
شارك

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