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

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


abouelhassan

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

السلام عليكم اخوانى الاساتذة الافاضل الكرام

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

مع الشكر وخالص الدعاء

 

1311.11.DATA12.rar

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

اساتذتي الكرام زادكم الله من العلم 

وجدت بالملف المرفق في الشرح هذا الكود

Private Sub تفصيل_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.txtTimer.Value = 5
End Sub

و من التجربة علمت انة يعيد العد من جديد

فهل اطمع في شرح الكود 

جزاكم الله خيرا

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

بارك الله فيك اخى استاذ محمد سلامة

وجدت ملف جاهز وكود للاستاذ الكريم جعفر بارك الله فيه

هل بالامكان توضيح اين اضع هذا الكود فى اى حدث

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

Private Sub Form_Load()
   
   ' start the count down in 3 minutes (60 x 3 = 180)
   Me.Tag = 180
   
   ' interval is every second
   Me.TimerInterval = 1000
   
End Sub

Private Sub Form_Timer()

   On Error Resume Next
   '**********************************
   ' Bail out when count down is zero
   '**********************************
   
   Me.Tag = Val(Me.Tag) - (Me.TimerInterval / 1000)
   
   Me.Caption = "Form will exit in " & Me.Tag & " seconds"
   
   If Val(Me.Tag) <= 0 Then
      DoCmd.Quit
   End If

End Sub

مشكور اخى بارك الله فيك

تم تعديل بواسطه abouelhassan
رابط هذا التعليق
شارك

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

1. Open the downloaded zip file ("isd_No_Setup.zip")

2. Save/Export the isd2000.mdb file to a folder on your computer.

3. Open your MS Access application and import the form "frmInactiveShutDown" from the isd2000.mdb database file.

4. Open the form "frmInactiveShutDown" in design mode, edit the OnOpen event procedure, and set the "intMinutesUntilShutDown", and "intMinutesWarningAppears" variables to appropriate values, or use the default settings. Save and close the form.

5. Put the following line of code in your startup procedure, or in your switchboard form OnOpen event procedure:

DoCmd.OpenForm "frmInactiveShutDown", , , , , acHidden

Or, import the macro "macInactiveShutDown", and execute it (use the RunMacro action) from your autoexec macro.


TIPS

معرفتش اعملها

والبرنامج مرفق رجاء المساعدة مشكور اخى

isd2000.mdb

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

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



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

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

Important Information