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

بعد التحية الطيبة

كل غام وانتم بخير

انا لدي برنامج للحضور والانصراف

لكن المشكله ان الساعه اي شخص يستطيع تغير الوقت في البرنامج

ما هو الكود اللذي اعطيه للساعه بحيث ان الموظف اذا اراد تغير الوقت تظهر له رياله تمنعه من تغيرهها

up
up up
up up up

عشره قرو الموضوع ولا فبه ولا واحد جاوب السؤال صعب

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

اخوية ضع هذا الكود عند النقر

Dim stDocName As String
Dim stLinkCriteria As String
Dim p As Date
p = Time
If p > Going_Time Then
Me.AllowEdits = False And MsgBox("ÚÐÑÇ áÞÏ ÞãÊ ÈÅÏÎÇá ÇáæÞÊ ãä ÞÈá æáÇ íãßä ÊÚÏíáå")
Else
Me.AllowEdits = True
Going_Time = Time()
End If


ثم ضع هذا الكود عند عنصر التجكم .....عند مربع نص
Going_Time