Yes! I agreed to Mile-O.
Static intLoginAttempt as Integer Or we can declare on top of the codes in Declarations
Option Compare Database
Option Explicit
Private intLoginAttempt as Integer
Edit your code like this:
Private Sub LoginButton_Click()
Dim intLoginAttempt As Integer 'Add this line here
'Your Some Code
MsgBox "Incorrect Username or Password"
intLoginAttempt = IntLoginAttempt + 1 'Count Login Attempts
Else
'Your some other codes
' Now...
Now when enter the greg date , the hijri says the same as i asked for a translation. for example:
gredate = 01/07/2017 hijridate= 01 rajab 2017
to solve in an awkward way , i have to change the year to 2016 or any number, the hijridate comes out ok. then i have to change back the correct year...
Private Sub OSPexpirydateE_AfterUpdate()
Me.[OSPexpirydate] = StDteHijriOfStDteGreg([OSPexpirydateE])
End Sub
When i input the gregorian date it typed in arabic the same gregorian date for example:
Greg date : 1/1/2010 Hijri date: 1 muharram (محرم 2010 You can't get the same field value...
aattas,
If you put the code in afterupdate event of Gregorian date field and if you have typed the field names in square [ ] brackets, then it should work.
What error message are you getting when you update your Gregorian Field?
Can you show your afterupdate code here?
Dear aattas
If your form has Gregorian Date field and Hijri Date field then you can add the following code to your Gregorian Date field on AfterUpdate event.
Me.[YourHijriDateField] = stDteHijriOfstDteGreg([YourGregorianDateFieldName])
In my database:
Me.DepartureHijri =...
Aattas
I am using like this. You can customize as per your need.
strGregDate = stDteGregofstDteHijri(your_hijri_date_ field_Or_strHijriDate)
strHijriDate = stDteHijriofstDteGreg(your_greg_date_field_Or_strGregDate)
Dear Experts,
Please don't laugh at me because I didn't learn access in academic courses. I am learning from Internet and specially from this forum.
I am using Office 2013.
I have created Ms Word Form for automation from ms access. All the fields in word documents work perfectly. But I...
Manish,
The code you used is different what I wrote. The mistake you used is
t = dur_time.text
you can use it as:
't = dur_time.value' as well.
There is no any problems in setting visible=no. the problem you faced may be not refreshing the form. you can use the below code:
Private Sub...
There is one problem that requires your attention. The first is that you will have to filter out the employee to the one you want.
You can include all employees but you will need an identifier which maybe what PLOG was referring to,
Thanks a lot rainlover and sorry replying late, because...
the difference is all that matters to me more than time1 and time2 values. I need to sort out records later on by difference (ascending/descending ) and also need summation of differences etc later on to analyse the data.
Now, is there any way out to do that? Storing large chunk of data isnt...
Hi RainLover,
Thanks for your good response. I think you understand 50% of my question. But if the later 2 dates will not be stored then how do you calculate the next vacation record. I want to record Last Arrival date and also the next departure date.
I know putting dates in textbox and...
Or need I create another table with the rows containing like this:
empID, LastArrivalDate, thisDepartureDate
and,
Query like this:
workdays: datediff("d",[lastarrivaldate],[thisdeparturedate])
I think it is not reasonable, is it?