Modules & VBA :: Auto Hit Commandbutton If There Is No Activity For 10 Minutes
May 19, 2015
I have to write piece of code to achieve the following:
1. When the Form gets opened then timer will start.
2. It will fire BtnClose_click event automatically after 10 minutes if there is no activity for 10 minutes.
3. Whenever BtnSave is clicked by the user then reset the timer.
One of the directors of the company I work for would like to have a large screen display the current status of jobs that my database stores. To cut a long story short the table he is interested in is called tblJobsLogging and is updated manually by our laboratory on a regular basis as jobs are completed using a form linked to a query in turn linked to that table.
Think fast food chain order monitor. He wants to be able to look up from his desk and see the progress directly in front of him at any point.
Is there any way that I can have an access form displaying these records in a datasheet view which continuously refreshes every X seconds / minutes or updates as a record is updated in the underlying table?
I have a database which has a table for the quotes prepared, each record has a quote amount. In a query linked to that table I have the ability to get just a specific month view which shows all totals in that month. I want to calculate a grand total for the amounts shown in quote amount:
Record 1 : 100.00 Record 2 : 100.00 Record 3 : 50.00
Grand total : 250.00
Then I want to display this grand total on a form which is visable on a screen based in the office that has an auto refresh on it so after 2 minutes any new records added to the table will increase the grand total on the form on the screen.
I have worked out how to do the totals bit, but now I need getting this figure (I.e. 250.00) on a form without having to run the query and have it looking in the background.
I have to write a code in a form so that if nobody is doing any activity for 5 minutes then after 5 minutes automatically press Close button named BtnClose in that form.
Basically I have a table setup where Time Fields are stored. What I need to do is in a Query, have the difference of two Time Fields calculated, and then displayed on a Report. Here's what I have so far...
All that works fine and shows up on the report, except for the fact that the time is showed in straight minutes, so for a difference of 1:30 minutes, it just shows 90 minutes. I need to make it so that on the report in the Difference Time Text Box, it's showed as 1:30 instead of 90.
I tried putting the following in the Control Source for the Difference Time Text Box on the report, but it returns an error.
=[Difference Time] 60 & Format([Difference Time] Mod 60, ":00")
I have the following code for hours worked by staff over a 24hr period. However, I want to calculate staff pay by using their hours worked. The table I am using is populated with the minutes i.e. 270 but I want this field to display 3.5 hrs. I have initially got round this by using a calculated field in the table [Hoursworked]/60*[StaffPay] but this is not an ideal fix. Can I add something to the code below to display the hours to 2 decimal places.
I am writing the following piece of code to be called again and again after 30 min. But I need to do invisible mouse move to stop screen saver occurring so i want to sendkeys after every 5 minutes. The Sub abc is in module and everything works except stopping screensaver from occurring.
Code: Private Sub UserForm_Initialize() 'Update the Barcodes printed today Call CommandButton1_Click 'Update batches to be scanned / batches scanned today Call CommandButton3_Click
Code: Function FormatTime(Amount As Double, Rate As Double) As String Dim x As String x = CStr(Round(Amount / Rate * 60)) FormatTime = Format(x / 1440, "hh:mm:ss") End Function
How can i modify this code to accommodate time that exceed 1440 minutes?
Not really sure how to word this as I'm not sure if I even understand. Basically I have been asked to set up a database logging distubances and need to display on the form 3 different dates (action by, monitoring period and date to close case) from the date the data is entered, depending on the disturbance chosen.
So if there was noise nuisance the action date would be 7 days, the monitoring period would be 14 days and the closing date would be 90 days. This would be different from, say dog fouling. When the user chooses the disturbance from the combo box I need the dates to reflect the deadlines for that disturbance.
I have entered the number of days to add onto the table containing the disturbances (ie 7, 14 etc) and know how to add these days onto the original date.
How do I make this happen depending on the disturbance selecting.:confused:
I've attached my database as I have it now. I am trying to create what amounts to an activity log.
I have created my main Subject and underlying related Issues tables, and a table for my daily activity notes. I have created my main form and subforms that should be sufficient (hopefully) for my purpose. Where I am getting hung up now is making the Subject and Issues fields combo boxes and filling them.
For the top-level Subject, I want to be able to type a new one in at any time, but also have the option to choose from a dropdown on the control as well. Then, if I do type one in, the next time I try to add a new record, it would appear in the dropdown as well. I think I have to query the underlying field to drive the dropdown list, but I cannot remember how to do that.
For the second-level Issue, there would also be a dropdown in the same way as the Subject control, and I want to be able to choose from the dropdown or add a new one in the same way... but I need to make sure that the ones that appear in the dropdown are related to the top-level Subject shown in the main part of the form. Of course, I don't want to be able to add an Issue unless it is related to a parent Subject. On these things, I am totally lost.
Finally, I built my notes to show in the subform as a continuous form, which I have used only once before. I'd like it so that the notes show newest at the top. And, I'm thinking about putting a "lock" checkbox on the note record so that I don't overwrite previous notes unless I consciously go back to edit something. I'm not sure how I can make an individual note dependent on an individual checkbox in the continuous form.
Access 2010 keeps changing the Capitalization of objects when I don't want it to.
For example "Cancel" becomes "cancel". Later it will be changed back to "Cancel".
There is also a table with a field "FULLNAME". Several Queries build a field "FullName". As a result FullName, even in places like Application. CodeProject.FullName get changed to Application.CodeProject.FULLNAME.
(Track Name AutoCorrect is off. ) It is especially irritating because I export the code to text files and check it into source control. Sometimes dozens, or even hundreds, of files will show up as changed because Access did it's rename thing.
Hey Guys & Gals, extreme newb here attempting to display the latest activity date in an SKU activity db in a query that spans 12 months with multiple activity dates on each of the 1,200 SKUS.
I have this so far and of course it only shows the last (DMAX) activity, not SKU related. How can I relate this result to each SKU to diplay the latest activity for each.
SELECT [Usage06-07].workorderDateClosed, [Usage06-07].qty, [Usage06-07].itemNo, [Usage06-07].Item FROM [Usage06-07] WHERE ((([Usage06-07].workorderDateClosed)=Dmax("workorderdateclosed","usage06-07","item"))) ORDER BY [Usage06-07].Item;
I need to find the frequency of client's appointment activity after their last appointment in a 4 month window.
My question is: (1) Is my SQL going to give me the last time a client was in the office within the 4 month window?
(2) What will my SQL need to like to count frequency of appointments before and after window for each client?
(3) Can I do (2) in the same SQL shown above or will I need to make a new SQL statement?
Code: SELECT tblTest.Client, Last(tblTest.AppointmentDate) AS LastOfAppointmentDate INTO tblTest FROM tblTest GROUP BY tblTest.Client HAVING (((Last(tblTest.AppointmentDate))<#4/30/2014#)) ORDER BY Last(tblTest.AppointmentDate);
Details
Date Window I need to select the clients last appointment: Jan 1, 2014 - April 30, 201
Once the last appointment has been determined for each client in that window I need to count the frequency of appointments before and after that date.
I have a database that is used by managers to log activity of staff. We wanted to allow staff to write to the DB, but not allow them full access. We decided to accomplish this by adding a VBA function to an Excel sheet that they already use every day. It allows them to select a description, start time and end time and writes records to a database containing just 1 table.
The database used by the managers periodically runs an append query, and then a delete query to update with details of entries made by staff, and then clear the table to avoid duplicates during the next append.
I'm sure those of you with experience can already guess what's been happening and are shaking your head right now. It seems like entries made while the append query is running are being deleted when the delete query runs. So potentially I append 4 records, but delete 6 as 2 new entries were made before the delete query ran.
Is there a way to delete only the records that have just been appended? Or is there a more acceptable way of achieving this without using a delete query?
Just a question, I am developing a database for the company I work for and being new to Access, I have successfully made a login menu when the database starts up. The employee selects there name and begins data entry. Is there any way to log the activity of each employee, which records they inputted, date and time and so on?
This forum has been a lifesaver in the past and I hope someone can help me now.
I have a Contacts form that is used to input all the client's information. (name, date of birth, address etc).
I want to be able to force the person entering the data to not be allowed to tab to the 2nd text box (or any other text box on the page) unless in the first text box data has been entered (the first text box is client name)
However, I also need to be able to overide this if the person entering the data clicks on a "Cancel" button (another button on the page which closes the form).
Is this possible and if it is any help would be greatly appreciated!
I have time sheets from the past I need to enter but have found that some years the time punch minutes are given as if an hour equals 100 minutes not 60. Other years the minutes are given correctly. How do I format this field so that if I type 3.75 it will convert to 3.45 hours? Will I have to add another field to enter this and then convert to my field where hours and minutes are correctly entered? :confused:
I have a query that shows a list from GPS software (car fleet management), unfortunately the software is not capable of doing a decent reports thus I'm trying to use its data and do it myself.
The table structure is as follow:
Car, Date, Time, Position.
The time interval I have now is 1 minute (short time format), I don't need it so detailed, that's why I was thinking to limit this into 5 minutes interval.
Here's one that I'm having difficulty on. I know just enough about code to completely confuse myself, so if you answer this, please explain in detail. I have a training database, in which a portion of it stores the scores of events of a physical fitness test. Part of this test is a times 3 mile run. I need to calculate a point value for the submitted time, but here's my dilema...If I use the time/date feature it accepts the input as hh:mm, and will not let a time of more than 24 minutes be entered, since it sees this as 2400, or midnight in military time. I need the data to be inputed as mm:ss, and I have another text box that accepts this info and converts it to a point value. I would appreciate any help you could provide. Thanks in advance.
I want wage rate should be inserted automatically instead of manually in attendance sheet. In labourwage form, wage rate will be fixed for labour type with wagedate as and when required. Once I add attendate in attendform, it should look-up the table labourwage and auto insert wage rate entry in to wagerate column for the respective month ie from the given wage date up to next given wage date of labourwage. I have tried much, but not succeeded and presently entering manually which is time wasting. This should be possible with writing some code with VB.
If I have a time like 22:00 and I want to add lets say 300 minutes to it; so it now shows 03:00 how do I do this? I can do it in Excel alright with the TIME function but cannot find a similar feature in Access