كيف عمل وقت لنموذج يمكن توقيفه لوقت معين

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

أخي الكريم / yah460

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

سوى بغلق القاعده او فتح نموذج معين !!!

هل هذا ماتريد ؟

مع تحياتي ،،،

عبدالمانع

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

الفكرةان النموذج مثلاً يفتح الساعة 6 صباحا ويغلق الساعة الثامنة ولا يمكن فتحه الا برقم سري ثم يفتح للإنصراف من الساعة 2:15 الى 2:45 دقيقة بعد ذلك يغلق الانصراف الى الساعة 6 صباحاً وعلى طول هكذا.هذا الكود للتعديل.

Private Sub Form_Open(Cancel As Integer)

TheDate = Date

If (Time = #4:45:00 PM#) Or (Time < #4:48:00 PM#) Then

MsgBox "غير مسموح فتح النموذج الا المختصين"

' Cancel = True

If InputBox("أدخل الكلمة السرية ", "كلمة سر مطلوبة") <> "1111" Then

DoCmd.CancelEvent

Else

DoCmd.OpenForm "Main"

End If

End If

DoCmd.Maximize

End Sub

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

تفضل أخي الكريم / yah460

تم تعديل الكود التابع لك

Private Sub Form_Open(Cancel As Integer)
    TheDate = Date
    If (Time = #4:45:00 PM#) Or (Time < #4:48:00 PM#) Then
    MsgBox "غير مسموح فتح النموذج الا المختصين", vbCritical, "الفريق العربي للبرمجه /الاكسيس"
        Cancel = True
        Else
        If InputBox("أدخل الكلمة السرية ", "كلمة سر مطلوبة") <> "1111" Then
    MsgBox "غير مسموح فتح النموذج الا المختصين", vbInformation, "الفريق العربي للبرمجه /الاكسيس"
DoCmd.CancelEvent
Else
DoCmd.OpenForm "Main"
End If
   End If
DoCmd.Maximize
End Sub

مع تحياتي ،،،

عبدالمانع

شكرا اخ عبدالمانع للرد السريع والله ويفقك آمين.

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

اهلا بك أخي الكريم / yah460

نحن في خدمه هذا المنتدى وبالتوفيق ...

مع تحياتي ،،،

عبدالمانع

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

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

يوجد ملف مرفق فكرته من الاخ مهند جزاه الله كل خير والاخوان ايضاً.

للرفع

للرفع

آسف أخي yah640

أنا عندي اكسس 97 .

Up Help me the time is over

انتظر ردكم

السلام عليكم

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