I use a timer based event that shuts down the frontends after some idle time.
1. How to disable the timer as it causes some weird bahaviours while editing the code? is shuting down the hidden form enough?
2. Is there a way to add regular maintenance intervals, i.e. every wednesday at 20.00.? how?
Hi
Does anyone know if it is possible to create a macro (or whether there is another function) so that a database will automatically close after a period of inactivity.
There is only one form that users will see (or use) but if this form remains inactive for say 20-minutes the program shuts itself down.
My initial thought was to use Form>On Timer facility but I would need to be reset the timer after every update. This seems particularly longwinded and I'm not 100% sure it would work.
Any suggestions would be gratefully received.
Thanks.
I'm looking for a code that close my databse when a user is unactive for a set time.
I've search the forums but nothing workked for me
Is there someone who already have a code for this or maybe can help me?
thanks in advance
I created a form to list the number of customers in my lobby. In the Form Footer I placed a field to count the number of customers waiting (Name: CC1, Control Source: =Count([LName]). Works fine.
I want a Beep on the form if the customers exeed 5. I placed the following code in the Timer event but I cannot get the event to work. I believe it has something to do with the field name but I'm unsure. Any help would be appreciated.
Private Sub Form_Timer()
Requery
If [CC1] >= 5 Then
Beep
Else
End If
End Sub
My form is always open and runs a timer event which runs a series of functions and procedures. I don't want to run a certain procedure on every timer cycle, but rather, every other timer cycle.
Any thoughts on how best to accomplish this. I'm having a mental block!
Scott
Got a problem here:
Timer Interval = 5 Seconds
Private Sub Form_Timer()
My code here..
End Sub
The code repeats every 5 seconds, what I want to do is to execute it only once.
I've taken a break from Access for a while, but I'm back at it again and having some difficulty. I am trying to open a form with a timer to state that the database is going to shut down in five minutes if they don't respond. I'm obviously using the wrong code. I've been trying to use the following:
Private Sub Form_Timer()
DoCmd.OpenForm "frmWarning"
If Forms!frmHidden!chkActive Then
Forms!frmHidden!chkActive = False
Me.TimerInterval = 300000
Else
DoCmd.Quit
End If
End Sub
It crashes on the 'DoCmd.OpenForm "frmWarning"'
I have a form (MS Access 2003) that has a button that when pressed, assigns the current time to field [Time1] using
Code:
Me.Time1 = Now()
I have another field [Time2] that adds 15 minutes to [Time1] using the following in the Control Source field
Code:
=DateAdd("n",15,[Time1])
I was wanting to use these to force a message box when the system time reached Time2 and tried the following code on the Form ON TIMER event (Interval at 1000 ms) but it does not work.
Code:
If Time() > Me.Time2 then
MSGBox "Time to show message"
End if
I tried putting in a manual time in the VBA such as:
Code:
If Time() > #2:05:00 PM#
MSGBox "Time to show message"
End if
which worked. So, I am guessing there is something with my orignal code using Me.Time2 that is causing the problem.
I need a query run that brings up a list of customers that need maintence after 6 months after their last maintence service. As soon as you open the DB, the event/query runs and if there are any customers past due to display them. And if there are none, to not even show the query at all.
I have very little experience with timers and if/then statements and don't know how to set this up.
Any help would be greatly appreciated. Thanks in advance.
I have Access 2010 and have made a small system that creates a table as a result of an query based on linked tables. The result is approximately 40 records that are grouped in 4 different priorities where each record has a status of green, yellow or red.
By using the timer event I want to loop through 6 different forms starting with the overall view and herafter priority 1 form, priority 2 form and so on. When the last form has been displayed start over again. Loop for ever until stop button has been pushed on the first form.
The timer is set to 15000 on each form, when I open a form the first thing that happens is that I close the previous open form.
After the system has looped 4 times it gets "SYSTEM RESOURCE EXCEEDED".
I have used 3 days on the internet to try to get a solution on my problem with no luck. I have got so far that it must be something with the timer function. Since if I run it manually (open form, close previously, open next form etc) then no issues.
I have the latest service pack for access 2010.
I have tried using a timer event to not show a form until it is fully loaded, to no avail.
Code:
If CurrentProject.AllForms("FONNewEdit").IsLoaded = True Then
Me.Visible = True
Me.TimerInterval = 0
End If
I have tried using the onload, onopen but the form still displays before being fully loaded.
I work for a company that manufactures home appliances & electronics. When those products fail within the warranty period, we are obligated to repair the units for the customers.
We have around 200 factory technicians who make those repairs. Each tech is able to make approximately 8 repairs each day. We have a dispatching system that assigns the repairs to the techs based on their availability each day. But the problem is that we have to manually enter and adjust the schedule for all 200 techs every single day, and this takes a lot of time. And of course technicians get sick, take vacation, etc, so we have to adjust the schedule so no techs will be assigned calls when they're off.
The problem: For example, currently when a technician takes off for 2 weeks, the user has to enter 14 individual records for the tech, which is somewhat time consuming. What I need is to program a button click event to determine the two dates (startDate & endDate) and append multiple records from one single entry in the form for each date in between and including the two date fields.
I know I'll probably need to create a loop that will loop through the two dates on the form and append a record for each day, so I can then cross reference the dates to the master schedule dates to make sure that no availability is opened for the techs taking time off.
I tried this but dont know how to stop the timer...I want to run the code that changes the Form color but want to be able to stop the Timer and reset it to start over..Will this timer work? Almost like an auction timer. But want to be able to reset the code at any stage...
Code:
Public Sub ExcelTimer()
Dim PauseTime, Start, Finish
[code]..
I'm making up a stock system for the independent jewellers I work for. Each stock pattern needs an individual code which can quickly be recognised read as tickets are often taken off the jewellery and can be mixed up easily. To this end we categorise based on two criteria:
1. Material
2. Type
At the moment these are as follows:
MATERIAL
IDMaterial
0Base and Miscellaneous
1Silver
2Gold
3Palladium
4Platinum
5Pewter
TYPE
IDStock Type
0Previously Owned
1Ring
2Pendant
3Chain
4Necklace
5Bracelet or Bangle
6Earrings
7Brooch
8Gents
9Gift, Clock or Miscellaneous
So if I had three pairs of silver earrings I want the first to be No. 161, the next 162, the next 163. If I had three Gold Bracelets I'd want them No. 251, 252, 253 and so on...Material and type are both selected form separate Comboboxes on a form.
I have a table called Contacts in Access:
ID Email
001 email1
002 email2
003 email3
004 email4
008 email5
010 email6
And I have a table called Data in Access:
ID Date Person Title Yes/No Action
001 20/4 Mr A Consultant
001 20/4 Mr B Supervisor
001 20/4 Mr C Consultant
004 20/4 Mr D Consultant
010 20/4 Mr E Consultant
010 20/4 Mr F Supervisor
What I'm looking for is coding that would start with the first ID number in CONTACTS and see if there is the corresponding ID in DATA. If there is, then I want it to create an Outlook email and have:
1.To field populated with the email address in the CONTACTS table
2.From and CC fields to be my email address
3.The subject line needs to read [ID] "Request" and then today's date backward (e.g. 20150420).
4.The body I need to put some generic wording and then a table with the records from the DATA table (first 5 fields plus the headings).
5. The format of the table etc isn't important as long as it is a table format
If it's created the email I want it to go back to the DATA table and put "Email Created" in the Action column for those IDs.
I don't want the email to automatically send; I only want it to create a draft (as this data needs to be manually confirmed before sending).
If for example it gets to checking in DATA table for ID 002 (and as seen there's none there), I want it to skip creating the email and move on to the next ID.
In the end I would expect to see 3 draft emails open in Outlook ready to be sent, looking something like the below (just 001 below)?
From... my email
To... Email1
CC... my email
Subject: 001 Request 20150420
action the below:
ID Date Person Title Yes/No
001 20/4 Mr A Consultant
001 20/4 Mr B Supervisor
001 20/4 Mr C Consultant
And the DATA table look like this (if only 001 email was created):
ID Date Person Title Yes/No Action
001 20/4 Mr A Consultant Email created
001 20/4 Mr B Supervisor Email created
001 20/4 Mr C Consultant Email created
004 20/4 Mr D Consultant
010 20/4 Mr E Consultant
010 20/4 Mr F Supervisor
I will need to add more data to the CONTACTS table over time, also the DATA table will be different each day so I need the coding to accomodate for both of these possibilities.
I have globally defined 'Progress' as integerer and using the following code on my splash screen - i want to add a "." to the end of the label caption until progress = 10 (10 timer events)
Private Sub Form_Load()
Progress = 0
End Sub
Code:
Private Sub Form_Timer()
Dim Dot As String
Dot = "."
Progress = Progress + 1
Me.lblProgress.Caption
If Progress = 10 Then
DoCmd.OpenForm "frmLogin"
DoCmd.Close acForm, "frmSplash"
End If
End Sub
Hi everyone,
Is there a way to automatically shut down Access after a given amount of time?
I have an Access application that runs across a network. Access is the front end of a SQL Server 2000 database.
Some of the users forget to close their application at night when they leave for the day. When I come in in the mornings, I like to run the Compact and Repair, but can't because someone is still logged in. So then I have to go to each and every computer to see if they are still logged in. By the time I vist each computer, the morning is almost started and people ARE logging in for the day.
So I'm hoping to find an application that will automatically either log each computer off across the network, or that will log the application off of each individual computer after a given amount of inactivity.
Thanks for your help...
Hi,
I've searched the forum for a sample code on how to automatically shutdown database at a given time of the day, but i can't find any. There are lots of codes pertaining to inactivity / idle users but none on scheduled time.
My idea is to kick-off all users every 12:00nn, Monday to Saturday and then compact / backup database after.
I hope someone could assist me.
Thank you!
Sheila
I recently got a corrupt backend with the standard "unexpectedly quit Microsoft Access" message. This type of corruption (backend) has never happened before so I'm a little worried. I think I've taken the standard preventitive steps, but I'm hoping I can do more.
I guess I have two questions but my main one is, what's the most graceful/ideal way to close an Access database as to reduce chances of corruption?
My other question is, does the size of the database have any bearing on it's corruptibility?
I am still learning access and have been helped alot by this forrum so I thought someone may be able to help me here. I am trying to experiment with security from a few different angles, privileges to folder, to database, inactivity shutdown, ect. I know that my office shuts down at 1630 hrs every day and noone comes back in till 0730 the next morning. Is it possible to ether load a script/macro on start up that will query the time every so often, and if the time is between 1700 - 0700, automatically close the program? If so could the inactivity timer sample supplied by petersoft be modified to accomplish this? If not possible, could a conditional statement be loaded on start and at a set interval after that to do something like (iif (time())<1,docmd.quit,"").
Thanks all
Narack
I know how to assign an event to a combo box, but I want to be able to launch a specific link, app, or email template, based on the actual selection from the combo box. So when I make a selection, whatever program or event I assign, to that specific selection, will launch.
View 14 Replies View RelatedI download the database from this thread http://www.access-programmers.co.uk/forums/showthread.php?t=103278 and I copy the table, form, macro and module to my database but and error is appearing showing that missing shutdownform.
Pls can any one help me.
Help !
The MS Access 2000 application I have developed for my remote client, when deployed, occasionally shutsdown with no error message and no clue as to why.
There is no common pattern that I can establish. Compact and Repair makes no difference. Have tried re-writing objects that I suspect may cause this. I have tried creating new front end and back ends and re-importing all the objects. Have tried programatically deleting and replacing all queries. Have tried converting to Access 2003 and back again.
Is there any third party trace tool that I could use, or expertise that I could engage?
My London based client is losing patience and I am staring down the barrel of 4 weeks worth of work going unpaid.
Thanks in anticipation...
--
Richard
Is there a way to shutdown an particular db when multiple users are logged on from my pc?
i.e. - When I need to get into design mode and can't because of other user's being logged on.
Or at least be able to send them a friendly message from within access to ask them to get out?
I want my primary key to be
First 3 letters of surname + first 3 letters of forename + DD + YY (Date of birth)
I can use the after update event to update the primary key field but it won't get saved for some reason so have I missed something?
I have a query that has some reminder dates. 10 days before an event and 5 days after. I was wondering if it would be feasible to create an outlook reminder based on the query and if so how would I go about it?
View 1 Replies View Related