กระทู้เก่าบอร์ด อ.Yeadram
1,847 2
URL.หัวข้อ /
URL
การทำ Auto Log off
อยากทราบวิธีทำ Auto Log off ครับ โดยมีเงื่อนไข ดังนี้
1. ให้ระบบ Log off เมื่อหน้าจอ no respond ตามเวลาที่กำหนดไว้ เช่น 10 นาที
2. เมื่อ user Log on ??ีกครั้ง ให้กลับมาหน้าจอที่ user ทำงานครั้งสุดท้ายค้างเอาไว้
ท่านใดพอมีแนวคิด/วิธีทำดีๆ รบกวนช่วยหน่อยครับ คิดไม่ออกจริงๆ
1. ให้ระบบ Log off เมื่อหน้าจอ no respond ตามเวลาที่กำหนดไว้ เช่น 10 นาที
2. เมื่อ user Log on ??ีกครั้ง ให้กลับมาหน้าจอที่ user ทำงานครั้งสุดท้ายค้างเอาไว้
ท่านใดพอมีแนวคิด/วิธีทำดีๆ รบกวนช่วยหน่อยครับ คิดไม่ออกจริงๆ
2 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R01590
ขอบคุณครับ จะลองทดสอบดูครับ
Time: 0.2785s
ก่อนอื่นไป Set Property
Time Interval ให้เป็น 1000
Key Preview ให้เป็น Yes
Option Compare Database
Dim wTime As Integer
Private Sub Form_KeyPress(KeyAscii As Integer)
wTime = 0
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
wTime = 0
End Sub
Private Sub Form_Timer()
wTime = wTime + 1
If wTime > 10 Then Application.Quit
End Sub