I have a login form that closes automatically after a specified time if you do not login with user name and password. It also keeps track of how many times you login and whatever value you set for a password reset it forces you to change when that value is met.
Problem: If you do not login within the allotted time even though a password change has been scheduled, my code resets the login count back to 0.
This is what i want to get around if I can. Either I have to pause the timer or stop the reset.
After you enter the password is when the login count is fired.
And also when it checks if a new password is required.
I would like to know, how do i reset the count of my auto number fields after testing? is it also possible to specify which number the auto number should start counting from?
I have a database that is tracking donations for my organization. I have some members who donate the same amount every month. Is there away to copy the records and paste them with the current date in the "Date Paid" field, and do this "Update" once a month? As opposed to typing in 200 records each month? I would assume that I would have to run an update query which filters to just the members that pay each month, but the big question is how to copy and paste these records. I am using Access 2010, I have some VB ability, but not an expert by any stretch. My SQL is not strong at all either.
Having a bit a brain freeze today. I have a field that auotmatically puts a date in when a checkbox is checked I am now trying to add a field which returns the day of the week from this date. Brain now mashed I am sure it's pretty simple but I just can't get it to work
I have a vba code export a error message if the current date of a file is not correct.. I have tested the code it worked to send a error message to a error.txt file but he it doesn't look to the modified date
So instead of:
file1.txt (13-02-14) Then Send error message ("file not updated") to: Error.txt
IF NOT no action requeried
This code does the following :
file1.txt (Modified date: 13-02-14) Then Send error message ("file not updated") to: Error.txt
file2.txt (Modified date: 14-02-14) Then Send error message ("file not updated") to: Error.txt
Code: Sub CheckD() Dim FSO As Object: Set FSO = CreateObject("Scripting.FileSystemObject") Dim objFile As Object: Set objFile = FSO.GetFile("C:Users ameDocumentsShow5621.txt") If objFile.DateLastModified <> Date - 1 Then
[Code] .....
So also if it is the current date he send the error message to the error.txt file, it could be possible that i did something wrong.
What I really need is for when the form opens, it looks at todays date, then matches current user and then goes to that record for today, if no current user there, then will goto new record..
i know, sounds complicated, and probably is really easy, but my heads not with it today, as about to get drunk as its my 40th, and got people ringing and texting and still trying to get this done....
I've included a copy of this database, named Timecards..
I just change my default menu bar in access from start up option. And created a new menu with some sub menu which I want. But when I remove all tick mark from different toolbar and only select my new menu, I can't show default menu bar again. How I can show default menu bar?
I have a BE database that we have been using for over a year. I imported data from an external database into this database. Now I've found that my Autonumber has reset to a very low number -- that was imported from my external database. Is there a way to change this autonumber BACK to what it was and increment up? The lowest autonumber in this database is 275944, so I don't have to worry about duplicates in the near future. I would like it reset to 457230, or at least higher than that number.
I have created a database and made the steps to the user-level security and VBA protected the project but i lost the passwords and the MDW file.
is there any way to reset the VBA pass then reset the security level?
this is very important for my business it's a school database with lots of info and it's critical for me to update or at least export some reports and forms to a new project
Curretnly I have a query setup with Area, EventDate, & Complete. I want to be able to count each occurance of complete in current week. So far I have the following criteria under EventDate.
DatePart("ww",[EventDate])=DatePart("ww",Date()) And Year([EventDate])=Year(Date()).
So, this does in fact get me the records of current week, the issue I'm having is when an area has occurences daily. It will not bulk that area into a weekly count. I just need to be able to see how many occurances happen in the week total not daily. So my results could be.
I havent used Access for sometime so please bear with me.
I have a text box called txt18 on a subform which is used to display the total no of records within subfrmPSR. I have used =Count() in the control source.
My 2nd text field called txt17 (unbound) I would like it to count as users use the move next and previous buttom to navigate thru the record. As they move through the records I would like txt17 field to count from the first record to the current record in the set.
I imagine that a piece of code will need to go in OnCurrent of the subform referring to txt17.
I have a report that displays simple date fields. One of the fields is "lease execution". On the report, I want "lease execution" to display differently depending on the date the report was run.
So:
- If the "lease execution" date is more than 120 days away from today, I want it to display as Q YYYY. - If the "lease execution" date is between 120 and 90 days away from today, I want it to display as MM/YYYY - If the "lease execution" date is 90 days or less away, I want it to display the normal date MM/DD/YYYY
I was thinking I would need to do DateDiff() to figure out an amount of days that's between Now() and [Lease_Execution]. Then based on that amount make the report show it differently. Pseudocode would be: if DateDiff() = 40, then display [lease_execution] as MM/DD/YYYY
I am building a database to track contract of employees so that I can know which contracts are valid and which are expired.
My table has the following fields:
ID (Primary key) Employee ID (Foreign key to link to the employee table) Start_Date End_Date Status (Either valid or expired) Challenge
I want when I enter the end date, the system checks the end date against the current date and fills in the status field with either valid or expired as appropriate. For instance if the contract end date is March 10,2016, the status must be filled in the word valid.
i have just started to use access and i know how to insert the current date into a field using date() but i am not sure will this change the date everytime i open the form ? i want to create a form for invoices that shows the date the invoice was created and doesnt change if i re open for editing,
I have about 1500 records in a table. We use a form to search through the records to find info on certain accounts. We now want to only search through accounts that are current, so I made a query to see only current accounts. I switched the search form from going off data right from the table to the new current date query. Now when you load the form it says "running query" and the application stops responding. The query seems to load up quick in raw format.. how come the application freezes when searching using the query instead??
Hi there, I am trying to put a query on my form which selects the most recent date of a members attendance from an attendance table and displays it in a text box, the code I am using is:
Private Sub Text41_BeforeUpdate(Cancel As Integer) SELECT MAX(Attendance.AttendDate) as "LastAttended" FROM Attendance WHERE Attendance.membershipNo = Forms!Customer.sbfAttendance.Form.membershipNo End Sub
Customer is my main form and Attendance is my subform. I think the mistake is that I dont have a field called last attended (you are not supposed to store data like this are you) and I need it to display in my text box (text41) on the main form