Modules & VBA :: Automatically Log Out After Certain Time Of Inactivity
Mar 23, 2015
I have the forms all set up and a control panel (switchboard) that opens after the user logs in.... (not web based)
What I am trying to achieve now is a time delay or set timer that will force all the forms etc to close and revert to my "Welcome Screen Form" where the Login button is located.
Essentially I wish to have it automatically log out after a certain time of inactivity... not close the workbook but redirect to the Login area.
View Replies
ADVERTISEMENT
Jan 25, 2015
I have a form fmrClasses and what I'm trying to do is write a code that as soon as the user types a beginning time will update the end time to 3 hours later for example If user enters 9:00AM for beginning time the end time will be set to 12:00 pm.
View 9 Replies
View Related
Jan 28, 2005
sooo the people i work with are morons and will leave their desks with the db open and forms open to records. i know unbounded forms would solve this problem, but i also don't like the db being left open for anyone to access if they leave their desks. i want the DB to count down from 10 mins after the last action and then display a message that says
"you have been inactive for 10 mins. click 'Yes' to have the program remain open. click 'No' to exit the program. if you don't click either, you will be automatically logged off in two minutes."
then once this message pops up (maybe a modal form? or maybe a msgbox), a two minute timer begins, and if no button is clicked, the db closes itself.
i know this is possible, i just haven't used timers yet and am unfamiliar with how to use them. thanks
View 1 Replies
View Related
Nov 11, 2007
I am trying to get the current time to display in the same record as an identity number.
I am using a barcode scanner to identify the ID number. Using a program called BC Wedge it will place the ID number into a field in a table of the database. I also want it to record the current time the ID number was scanned.
I tried setting the default value of the 2nd field to Now(), however this does record the current time, but in a new record. This basically gives me a list of ID numbers from the barcode scanner and a list of recorded times, however all the times are one record out.
Is there anyway to get the recorded time to be placed in the same record as the ID number?
As far as I am aware the BC Wedge software needs to have the table in table view, although I may be wrong about this.
Hope somebody can help me with this.
View 4 Replies
View Related
Oct 24, 2005
Most likely a newb question, but how can i just update the date/time field to the current date, as opposed to constantly entering in the current date?
Thanks
View 1 Replies
View Related
Jun 2, 2014
Is it possible for a query to automatically get updated each time a table is added. For example I am looking at prices and each month a new table of information is added for that month and I use a query to view each month next to each other. Is there a way that each time I add a table the query will automatically update?
View 1 Replies
View Related
Nov 12, 2013
How to copy the time automatically to text box to become time as data (rich text) when entering data to a form.
View 2 Replies
View Related
Sep 23, 2013
I have a simple and small database having only one table. I want the data table to be exported in a spreadsheet format automatically at the end of the month. Is there any code or function to do that?
View 1 Replies
View Related
Dec 1, 2013
I have a working dB which can calculate a shift duration and sum total all shifts worked within a period for the purpose of producing a labor report for payroll. I have successfully used the DateDiff function and converted the minutes to HH:MM on my form and reports. Now I want to calculate elapsed time for a specific period within a shift, I'll call it OtherHours and I am aiming to calculate a portion of time that meet the following conditions below. I am using field names of [PunchIn] and [PunchOut] and both are of type General Date.
IF [PunchOut] ISNOT Saturday,Sunday
EXIT FUNCTION
ELSE
IF [PunchOut] ISNOT Between Midnight and 0559 hours
EXIT FUNCTION
ELSE
DATEDIFF ("n", <MIDNIGHT>, [PunchOut])
My thoughts are to solve the DateDiff portion and then figure out how to apply the conditions within the IF statements.
View 4 Replies
View Related
Mar 19, 2014
In my Access form, users update 4 checkboxs when their work is completed, when this 4 boxed checked then the 5th checkbox will check automatically using afterupdate. Now i have added the 6 the column with date completed, here i want the date to be updated automatically when the 5th column is checked automatically. how to do it?
View 10 Replies
View Related
May 27, 2014
I am working on a database that will notify technicians if they have orders that have been placed on back order. The technician can enter two kinds of orders, one for a specific job and one to replenish the stock in his truck. My manager has asked that I create separate reports for each kind of order and e-mail them to the technician. Is there a way to program Access to send an e-mail with two separate attachments?
I would also like the e-mail to send without the user needing to click the Send button. Is that possible? The database will be sending twenty plus e-mails each time the button is pressed, and I would like to avoid needing the user to click the Send button that many times.
View 1 Replies
View Related
Aug 13, 2014
I have inventory database, in database there is "NextScheduledMaintenance" field.
I want access to send email automatically when scheduled maintenance date due.
View 7 Replies
View Related
Mar 17, 2015
I am trying to update the range for the graph automatically and I'm calling this from Access because my data exists in Access. I've attached a sample file.what I am trying to do:
1) click on the button
2) button will update the usedrange in "trending" tab
3) have the graph's data range based on the usedrange.
Code:
Dim xlApp As Object
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
xlApp.Workbooks.Open "C:Documents and SettingsgjiaDesktopmetric_DEV.xlsx", True, False
[code]...
note: the columns will grow bigger to the right, which is dynamic, so I've used usedrange method, but the code fails on the usedrange line saying the object or method is not being supported...
View 3 Replies
View Related
Feb 26, 2015
I want to call commandbutton1,2,3 after every 10 seconds automatically but following code doesn't do that.
Code:
Private Sub UserForm_Initialize()
'Update the Barcodes printed today
Call CommandButton1_Click
'Update batches to be scanned / batches scanned today
Call CommandButton3_Click
'Update files batched and counted today
Call CommandButton2_Click
Application.OnTime Now + TimeValue("00:00:00"), "GoToSub"
End Sub
[code]....
View 7 Replies
View Related
Jun 10, 2013
I have a form (Project Form) with (Project_ID,Applicant_ID,Project_description, etc). To make it easier for the user who may not know the Applicant _ID when he/she is adding a new project for the applicant, I want to put a combo box with the Applicant Names in it, and once the Applicant Name is chosen, the Applicant ID will be filled out automatically and be saved in the Project Table.
My Approach so far was adding a combo box with two columns(Applicant ID, Applicant Name), and basically adding the following code:
Private Sub Combo36_AfterUpdate()
Me.Applicant_ID = Me.Combo36.Column(0)
End Sub
This approach works well, when I select an applicant, the Applicant ID will pop up correctly. However, This ID is not being saved in the Project Table.
View 2 Replies
View Related
May 24, 2015
I have a textbox on continues form which contains multiple lines and I d like to set it up so it ll be scrolled down completely when it displays the form. I ve already found a few so called solutions but nothing worked for me.
View 5 Replies
View Related
Oct 18, 2013
I am setting up a database to track preventative maintenance required for testing equipment in our repair shop. Some of my associates would like to be able to send e-mail notifications via the database when maintenance is due. I set up a query to show the people who need to receive an e-mail and a query to show the maintenance each person needs to perform.
Each person will need to perform more than one maintenance step each time. I would like to get it so that the database will loop through the first query and generate one e-mail for each person. I would like the e-mail to list all the steps that person would need to do (as shown in the second query). I know this would require setting up loops and I'm afraid I'm not very good at writing loops.
I think this will need two loops. One to loop through the first query to see all the e-mails that will need generated and one to loop through the actions to be included in each e-mail. The person's name is included in both queries and can be used to set up a link between the two.
View 5 Replies
View Related
Aug 27, 2013
I have a combo box that contains a list of values, but users can add their own if they choose. If the value they type in isn't on the list, the Not In List event fires. Once the procedure is done, the form inexplicably closes.
Oddly enough, it only closes under certain circumstances - the code provides several different options for saving the new data, and if I choose different options, the form works as its designed.
Further, if I insert a breakpoint anywhere in the code, then hit F5 to let the code run, the form works fine. Literally, the breakpoint can be anywhere in the procedure from the first line (On Err...) to the last line in the Exit block, "Exit Sub".
View 12 Replies
View Related
Oct 30, 2013
my database just records end of day sales figures which are entered though a form, after they are entered the total for the day is archived. However the problem i have is that the i need some way of clearing the input table with a command in the form.
View 2 Replies
View Related
Jun 26, 2015
I am looking to automate the process of linking my Access DB with an ODBC connection to an SQL DB with VBA (unless there's an easier way to do it?) - some sample code - if this is possible at all?
View 2 Replies
View Related
Aug 27, 2013
Recently I set up a button to export a report automatically to Excel using the following code: DoCmd.outputTo acOutput Report, "Report1", acFormat.xls, "J:Insurance DeptReport1.xls", True.This works great, however I was wondering 2 things:
1. How do you set up to transfer multiple reports using the same button. EG I have reports named Report2, Report3, etc how do I add these to the code to export as well?
2. Is it possible to have them transfer to the one file but different sheets. EG Report1 would go to sheet1, Report2 to sheet 2, report3 to sheet 3 and so on?
View 3 Replies
View Related
Nov 2, 2013
I have 3 fields on a form PU_POINTS, SU_POINTS & 2_MILE_RUN_POINTS. The user enters a number 1-100 in each of these fields. If the user enters a number in any of the 3 fields of anything less than 60 then I want it to check a fail box. If the user enters all numbers 60 or more then i want it to check a pass box.
View 2 Replies
View Related
Oct 31, 2014
All I have a form called frmMain. This form contains a TabControl named tabMain tabMain has some pages. One of the pages is called pagRecords pagRecords contains a subform called frmRecords. frmRecords contains records from an in-memory table.
My problem: If I select tab pagRecords the cursor is set to the last record.
What I want: as soon I select tab pagRecords, the record cursor must always be set to the first record.
I think this can be done with next code.
Code:
DoCmd.GoToRecord acActiveDataObject, , acFirst
However, I placed this line in a lot of event properties but it is never triggered (I put a break on the line).
So on which object and event should I put this line? (and is acActiveDataObject the right parameter?)
View 2 Replies
View Related
Jul 9, 2013
I have a main form called "frmMain" and on it I have a text control named "txtBoatStatus". The control source for txtBoatStatus is determined by code that I have in the Form_Current event. The code is as follows:
(begin code sample)
Dim BoatStatus as Variant
BoatStatus = DCount("[BoatComplete]", "tblBoatOrders", "[BoatComplete] = -1 And [OrderPresent] = -1")
txtBoatStatus.Value = "There are " & BoatStatus & " boat orders that are complete."
(end code sample)
Now when I first open the frmMain everything works great and the control will say, "There are 5 boat orders that are complete." Perfect. However, In the instance if I open the form with my Boat Orders and mark off another order as complete (bringing my total to 6), the txtBoatStatus does not update when I reopen frmMain. It will only update and show, "There are 6 boat orders that are complete." if I manually hit SHIFT+F9.
How can I do this automatically? I've tried various things such adding "Me.Recalc" or "Me.Requery" to differnt events, controls, etc. but I still cant get it to show the updated number automatically. How can I get it to update without SHIFT+F9?
View 2 Replies
View Related
May 4, 2014
I have a mainform with a combobox and a button. What i want is when i click on the combobox and then on the button I want that the textbox in the subform automatically fill in.
The mainform name is FrmTakenInvoerenEnToewijzenAanEenMonteur,
The combobox name is Keuzelijst1,
The subform name is SubTakenInvoeren,
And the textbox name is txtOpdrachtnr.
I tried this code in on button click:
Me.SubTakenInvoeren.txtOpdrachtnr = Me.Keuzelijst1
But that doesn't work.
View 7 Replies
View Related
May 19, 2015
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.
View 5 Replies
View Related
