Elsayed Bn Gemy

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

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

شكرا لك اخى الكريم محمد ان تفسح المجال لطالب علم ما زال يحبوا لينهل من نبع علمكم حفظكم الله بصفتى مبتدى لسه هحاول اركب بنفسى صلاحيات على البرنامج بتاعى بدون الاستعانة ببرامج واكواد كبيرة وهكذا بص انا حددت الصلاحيات فى 3 كلمات admin editor visitor فكان كل واحد يسجل على البرنامج الخاص بى اعتبره زائر فقط يرى ويشاهد وغير مسموح له بالاضافة او التعديل فى السجلات ثانيا المحرر وطبعا انتم عارفين صلاحياته واخيرا الادمن وهو المسئل عن كل حاجة فى البرنامج بما فيهم لوحة التحكم الخاصة باعداات البرنامج الكلام السهل بس التنفيذ فى الاول انا كنت شايفه صعب بس انا عملت الاتى فى جدول المستخدمين ضفت حقل اسمه الصلاحيات مصدر بياناته قائمة منسدلة فيها 3 وظائف (الادمن - المحررر -والزائر ) وكل مستخدم له رقم تعريف يولد تلقائى . اما فى النماذج فى كل نموذج كان من الطبيعى ان يظهر اسم لمستخدم الحالى فقمت باضافة حقل مخفى بالرقم التعريفى وقمت باضافة حق اخر مخفى باسم الصلاحيات وقمت بعمل الاحداث المتسلسة الاتيه قمت بعمل استدعاء لصالحية المستخدم الحالى عن طريق اسمه ووضعت قيمى هذه الصلاحيه فى مربع النص المخفى (صلاحيات ) وعلى حسب القيمة الموجودة فى مربع النص كنت اضع الصلحيات بمعنى اذا كان المستخدم الحالى مارد وصلاحيته المسجله ادمن قم باستدعائها فى مربع النص المخفى وبعد استدعها قم باظهار الزر المخفى المسمى بلوحة التحكم وهكذا وشكرا انك وافقت انى اصدعك شويه انا ممكن ابعت مرفق

هل هذا ما تريده يا اخى عبارة عن قائمة منسدله فى الاستعلام لتحدديد ما تريد db1.rar

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

العفو اخى ابا عبد الله نت استاذنا

متاسف لك ا اخى الكريم هذا هو الرابط ل 2010 https://www.microsoft.com/en-us/download/details.aspx?id=10910

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

هذا هو مرفقك يا اخى الكريم به التقارير التى تريدها تقرير اجمالى وتقرير عن موظف معين ومتاسف على التاخير يعلم الله ما انا فيه رواتب.rar

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

سؤال يطرح نفسه اخى الكريم رمهان وبقوة ما فائدة حذف التكرار اذا لم اوقف المصدر او السبب فى تكرار البيانات وانى اسال صاحب المشاركة هذا السؤال

اخى الكريم انا الحل اللى عندى انك تعمل نسخة من الجدول الموجود ولكن تخلى الحقول مفاتيح اساسية وتعمل استعلام الحاق عن الجدول القديم الحاق بالجدول الجديد وعند الالحاق لن يلحق سوى قيمة واحدة من القيم المكررة لو يمشى معاك ارفعلك المرفق ؟؟ الى ان يفيدنا الاخوة بحل

هل هذا ما تريد اخى الفاضل DB_Jandbi.rar

اضافة الى ما سيقدمه اخى ابا عمر هذا الكود مبدئا وقبل كل شيء يجب الاتى 1 - قم بعمل نموذج وليكن اسمه (sleep_mode) 2 - ستحتاج الا اخفاؤه بواسطة الماكرو ثم Hidden 3 - فى حدث عند عداد الوقت ضع الكود التالى Option Compare Database Option Explicit Private Sub Form_Timer() Const IDLEMINUTES = 60 Static PrevControlName As String Static PrevFormName As String Static ExpiredTime Dim ActiveFormName As String Dim ActiveControlName As String Dim ExpiredMinutes On Error Resume Next ActiveFormName = Screen.ActiveForm.Name If Err Then ActiveFormName = "No Active Form" Err = 0 End If ActiveControlName = Screen.ActiveControl.Name If Err Then ActiveControlName = "No Active Control" Err = 0 End If If (PrevControlName = "") Or (PrevFormName = "") _ Or (ActiveFormName <> PrevFormName) _ Or (ActiveControlName <> PrevControlName) Then PrevControlName = ActiveControlName PrevFormName = ActiveFormName ExpiredTime = 0 Else ExpiredTime = ExpiredTime + Me.TimerInterval End If ExpiredMinutes = (ExpiredTime / 1000) / 60 If ExpiredMinutes >= IDLEMINUTES Then ExpiredTime = 0 IdleTimeDetected ExpiredMinutes End If End Sub Sub IdleTimeDetected(ExpiredMinutes) With Screen.ActiveForm If Screen.ActiveForm.Dirty = True Then .Undo End If End With Application.Quit End Sub فى الواقع هذا الكود به ثلاث اشياء مهمة يجب ان تعرفها 1 - هذا الكود سيتراجع عن اى اجراء او تعديل لم تقم بحفظه 2 - هذا الكود لن يعمل فى حالة Sleep mode للكمبيوتر انما قبل ما يوصل للحالة دى 3 - الكود واخد امر اغلاق Application انما لو عاوز اى امر تانى يبقى نعدله بعدين شرح مهم لطريقة عمل الكود الكود بيقول انه اذا مر 60 دقيقة من زمن الخمول اقفل قاعدة البيانات ههههههههههههه ExpiredMinutes = (ExpiredTime / 1000) / 60 ممكن يتغير من متغير حساب زمن الخمول دا ونخليه مثلا دقيقتين ExpiredMinutes = (ExpiredTime / 1000) / 2 وشكر الله لكم حسن صنيعكم

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

ماشاء الله مبدع دائما كعادتك العفو كدا فاضل السؤال الاول صح ؟؟ انتظر ياتيك الفرج قريبا انا بجربه وهبعتوهولك فى المرفق

حاول اصلاح الاوفيس لديك من خلال كنترول بانل add and remove لان المرفق الذى ارسلته اليك قمت باضافة جدول باسم العهد يحتوى على رقم للعهدة وربط جميع الجداول به وهو سيغنيك عن اشياء كثيرة واضافة الى ذلك اماكنية لبحث برقم العهدة ؟؟ لمن ؟؟ ومتى خرجت وهكذا ؟؟

نقم خالص الاسف بس الموضوع مكنش ينفع يتجزأ مرة تانية نكرر الاسف

اخى الكريم بارك الله فيك نحن ننهل من نبع علمكم انتم تفضل مرفق لتسجيل الدخول والخروج وفتح حساب لاكتر من يوزر جديد كمان log(off-on).rar

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

عندى شويه اقتراحات ممكن تنفعكم اولا بالنسبة لازر تسجيل الخروج اولا لازم يكون عندك جدول للمستخدمين ودا الطبيعى ثانيا ممكن تضيف جدول للاعضاء النشطين العضو اللى يسجل دخول يتم نقل اسمه اليه وعند تسجلالخروج يتم مسح اسمه من جدول الاعضاء النشطين وطبعا دا سوف يتم من خلال الاستعلامات عادى بالنسبة للسؤال الول اعتقد انه ممكن نكتب كود فى حدث ( عند عداد الوقت ) وسيبونى افكر فى الكود ههههههههههه

هل تقصد بالراتب الكلى هو الراتب الاسمى ؟؟

جرب المرفق دا http://www.mediafire.com/download/4sfco7xrm4tl6k0/برنامج_عهد_المستودع_-_Copy.rar

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

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