I would like to have a form that simply has 4 or 5 due dates for certain things. I would also like to have a countdown field that takes todays date and all of the due dates and tells me how many days i have until then. Is this possible? And, if so, can anyone help?
View RepliesI am creating a databse to help people with course registration. I have a form (Classes) and a sub form (Classes Subform). In the classes subform I have the following fields:
StudentID
Major
PhoneNumber
Grade
On the Classes form I have two fields I am concerened about. Seats and a field called Open Seats. If I set the number of Seats (Seats) to 31, I would like 31 to appear in my open seats field. As I add students to the Classes Subform (New Records) I would like open seats to decrease by one. I've seen this done, but have no idea how.
Once this is figured out, Is it possible for the form to automatically change my Status field from Open to Closed?
Is there a way to have this stopwatch to countdown from 10 minutes to 00:00:00:00?
Option Compare Database
Option Explicit
Dim TotalElapsedMilliSec As Long
Dim StartTickCount As Long
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub Form_Timer()
Dim Hours As String
Dim Minutes As String
Dim Seconds As String
Dim MilliSec As String
Dim Msg As String
Dim ElapsedMilliSec As Long
ElapsedMilliSec = (GetTickCount() - StartTickCount) + _
TotalElapsedMilliSec
Hours = Format((ElapsedMilliSec 3600000), "00")
Minutes = Format((ElapsedMilliSec 60000) Mod 60, "00")
Seconds = Format((ElapsedMilliSec 1000) Mod 60, "00")
MilliSec = Format((ElapsedMilliSec Mod 1000) 10, "00")
Me!ElapsedTime = Hours & ":" & Minutes & ":" & Seconds & ":" _
& MilliSec
End Sub
Private Sub btnStartStop_Click()
If Me.TimerInterval = 0 Then
StartTickCount = GetTickCount()
Me.TimerInterval = 15
Me!btnStartStop.Caption = "Stop"
Me!btnReset.Enabled = False
Else
TotalElapsedMilliSec = TotalElapsedMilliSec + _
(GetTickCount() - StartTickCount)
Me.TimerInterval = 0
Me!btnStartStop.Caption = "Start"
Me!btnReset.Enabled = True
End If
End Sub
Private Sub btnReset_Click()
TotalElapsedMilliSec = 0
Me!ElapsedTime = "00:00:00:00"
End Sub
i wonna count down for 20 minits and then autoclose my program. every time there is an activity the counter has to reset. any idea where and how to do it?
thx in advance
killroy
I have two databases; a server and a client. The server houses all of the tables, while the client has the tables linked and serves primarily as a form for users to enter data to the main table. Periodically I update the form, so I would like to be able to shut down each client while I upload the new files to update the client. Here is my thinking:
I have a table in server.mdb called admin with 3 columns and one record.
The fields are:
closex (text) - This will be populated when I want to send the close countdown command.
message (text) - The string I want to display in a warning popup box.
Timer (integer) - The time in seconds before the program will close.
Right now I have a hidden LIST box in the form (closemsg) that is bound to column 1 and column count=3.
Me.closemsg.column(0) is closex
Me.closemsg.column(1) is message
Me.closemsg.column(2) is timer
The box is requeryed every 2 seconds to check and see if the table has been updated along with another line of code that keeps the time current until someone starts to enter a record.
I have a macro that will perform the close operation. Here is the code I have thus far....any help would be greatly appreciated.
___________________________________________
Private Sub Form_Timer()
'Updates the Time to Current
If (IsNull(Agent)) Then
Me!Call_Time = Time()
End If
'Checks for updated values in Admin Table
Me.closemsg.Requery
' -------------
'| Force Close |
' -------------
'Message Variable from T.Admin
Dim message As String
'Timer Variable from T.Admin
Dim timer As Integer
'Macro Variable to Close App
Dim macroname As String
macroname = "Closeapp"
'Check to see if T.Admin has changed
If (IsNull(Me.closemsg.Column(0))) Then
Else
message = Me.closemsg.Column(1)
timer = Me.closemsg.Column(2)
'Set Timer
timer = timer * 1000
'Notify User
MsgBox message
Count:
timer = timer - 1
If timer > 0 Then
GoTo Count
Else
DoCmd.RunMacro macroname
End If
End If
End Sub
hey,
Sorry to open with a question but its usually the way, i'm quite an experienced computer user but never used any office products before and just thought i should learn as i'm losing money every week by not keep track of things properly.
So then to my question..
I've made a table to cover all the orders i have had placed, this includes a date column for when that order was placed. I just wondered if it would be possible to have some kind of system where after 7 days without any acknowledgement from me it either pops up or turns red or something similiar. I'm thinking the acknowledgement could be the yes/no box and i tick that when i recieve the item back, if i dont it either pops up or turns red or something :confused:
any help much appreciated
I have created a countdown counter on a form using different Datediff's so to split the renaining time into days, hours, minutes and seconds.
The Datediff compares Now() to a text box called txt.Leaving which has a date/time unputted via a table (Format: General Date)
However the seconds and minutes work ok but the hours and days dont count down inline with the minutes and seconds reducing. The hours do alter when the minutes are 13 mins into the new hour. This would seem to point possibly to rounding off but I would expect that further into the hour.
Below is the Datediff that is set as the control source in a text box and the form it sits on has its timer set to 1000 and the event requeries the text box.
=DateDiff("d",Now(),[txt.Leaving]) & "d, " & DateDiff("h",Now(),[txt.Leaving]) Mod 24 & "h, " & DateDiff("n",Now(),[txt.Leaving]) Mod 60 & "m, " & DateDiff("s",Now(),[txt.Leaving]) Mod 60 & "s"
Using Access 2000.
I have access db sending report with outlook every Monday.
But the problem is if outlook is open when I start the db, email goes in to outgoing folder and msg box of outlook opens saying " outlook will close after countdown if I do not hit the "DO NOT EXIT" button or "EXIT AND SEND LATER" button.
If I hit "EXIT AND SEND LATER" button, it sends next time I open the outlook.
Is it possible to prevent outlook doing this?
Any way to have a form with Dates as column headers to update a table where the dates are stored in rows???
The table set up is like this:
tblOpHdr
DiaryID (PK) - OpDate (Date)
tblOpDetail
DiaryID (FK) - CostCode - MachineNumber - MachineHours - etc
I'm just wondering if there's any way I can do this with a datasheet or a crosstab type setup?
It's Access 2010.
I have built a query to calculate the expiry dates of training courses but I am trying to input a criteria so that only dates within 90 days of todays date show. I am using Date()<90 but it doesn't return the correct information. What the criteria should be for this?
View 1 Replies View RelatedI have a table of records, which has within it two date fields (effectively, a 'start' and 'end' date for that particular record)
I now need to create a query to perform a calculation for each date between the 'start' date and the 'end' date
So the first step (as I see it anyway) is to try to create a query which will give me each date between the two reference dates, in the hope that I can then JOIN that onto another query to perform the necessary calculation for each of the returned dates.
Is there a way to do this?
So basically, if for a particular record, the 'start' date is 01-Apr-2015 and the 'end' date is 09-Apr-2015, can I produce a dataset of 9 records as follows :01-Apr-2015
02-Apr-2015
03-Apr-2015
04-Apr-2015
05-Apr-2015
06-Apr-2015
07-Apr-2015
08-Apr-2015
09-Apr-2015
(The *obvious* solution would be to create a separate table of dates, from which I could just SELECT DISTINCT <Date> Between #04/01/2015# And #04/09/2015# - but that seems like a dreadful waste of space, if that table is only required to generate the above? And it would have to cover all possible options; so it would either have to be massive, and contain every possible date - ever! - or maintained, adding new dates as necessary when they are required. Seems horribly inefficient!)
Is it possible to just select each date between the two reference dates? Or can you only query something which exists somewhere in a table?
Hiya-
I have a database with 5000 entries, corresponding to about 10 entries for about 500 people. Each of the entries is dated, and I need to calculate the time intervals between each person's sequential entries in the table.
One way of doing this is to create another column that contains the date of the previous entry. I can then use DateDiff to subtract one date from the other and give me the difference in days.
This approach falls down if I then work with only a subset of the entries - I would have to re-enter the previous entry dates as the time intervals would have changed.
What I really need is a way of subtracting the date from the date in the cell directly above it. Will Access let me do this, or is there a better way?
Many thanks, Jules.
I have two tables with dates. Between (!) every two following dates in table1, I want to know the number of dates in table2. How do I write an SQL query for this? The tables I have are up to a few hundred records in table 1 and a few thousand records in table2. So to prevent that this takes hours I need a fast query.
To explain the query I need, for example:
table1
01/01/2014
15/01/2014
17/01/2014
30/01/2014
table2
01/01/2014
02/01/2014
05/01/2014
17/01/2014
18/01/2014
20/01/2014
21/01/2014
25/01/2014
So the answer of the query would be 2,0,4.
Explanation:
Between 01/01/2014 and 15/01/2014 in table 1 there are 2 dates in table2 (01/01/2014 is not included between the dates)
Between 15/01/2014 and 17/01/2014 in table 1 there are 0 dates in table 2
Between 17/01/2014 and 30/01/2014 in table 1 there are 4 dates in table 2
I have a master table which shows all transactions per record (person) over a financial year.
Each record person has a seperate package period over which their spend needs to be measured. Therefore although I have all their transactions for the year, I only want to sum their transactions between their given [start date] and [end date] which are in columns.
I need to be able to create a field which sums all expenditure per record between the start and end dates
Name Start Date End Date Invoice Date Amount
Matt 15/5/11 15/9/11 1/11/11 £100
Matt 15/5/11 15/9/11 7/7/11 £200
Matt 15/5/11 15/9/11 12/12/11 £200
In this case I would only want to sum 7/7/11 as this is between the start and end dates
I want to write something like sumif([Invoice Date] is between [start date] and [end date] - not sure where or how exactly
(The start date and end date will always be the same per person)
Is this possible in access?
Hi,
Please bear with me here as it's a little involved.
I'm doing a staff profile website which includes a section where they can enter their annual/other leave details.
I decided to store their leave in two fields Start_Date | End_Date rather than each individual date that they took - the short and wide approach vs long and narrow.
This has left me needing to do a query that would return all the dates between the start and end dates inclusive.
Example:
StaffID---Start_Date---End_Date
---1-----12/12/2004--14/12/2004
Returns:
StaffID---Leave_Dates
--1-------12/12/2004
--1-------13/12/2004
--1-------14/12/2004
I appreciate i could do this using some script to loop through a recordset and build an array of dates but i wondered/hoped that it could be done using SQL.
As it is an asp page i can't use user defined functions in a VBA module in Access so the solution would need to be pure SQL.
Is this possible?
Any help v.much appreciated.
TS
I have a scenario where the first three rows of date which have dates of 4/1, 4/4/ 4/6 with ndc 5513026701; next six rows that have dates from 4/8 to 4/20 with ndc 5513014801; next three rows that have dates from 4/25, 4/27, 4/29 with ndc 5513026701.
The issue I am having is I do not know how to have separate min/max dates for ndc 5513026701 since when I group by ndc 5513026701 min = 4/1 ; max = 4/29. I need to have min = 4/1 and max = 4/6 for one row and another row of min = 4/25 and max = 4/29.
Any easy way to sequentially create min/max for each ndc 5513026701? I wasn't sure how to verbalize this so I have attached a sample worksheet.....
I'm not sure if I am biting off more than I can chew. I have a text field in each record in my database (Inherited) The db has nearly 5,000 records. I would like to split the field into records in a seperate table. An Example of the table as is now;
Code:
MemberIDBoats
5882Opossum(78-80) (87-89) Otter(80-84) Opportune(91-93) Turbulent(97-00).
5883Astute Auriga Aeneas Affray Amphion
2407H34 O10 Porpoise Trenchant Tapir.
I want to create a table as follows;
Code:
MemberIDBoatFromTo
5882Oppossum19781980
5882Oppossum19871989
5882Otter 19801984
5882Opportune19911993
5882Turbulent19972000
5883Astute
5883Auriga
5883Aeneas
5883Affray
5883Amphion
Etc.
Is this possible in one hit or do I need to process the records without dates first and then run another process to split those with Dates? I say dates but the field is a text field. About 15-20% of the records contain dates which are always enclosed in parenthesis.
Is there a way in this program to create a list of dates between 2 dates?
i.e I have Arrival Date and Departure Date. Is there a function or expression that will list all the dates on and between?
I have a client that wants to enter a range of dates in a query of when they will call that person back. Then they want to be able to type in a range of dates and have a make table query show them all the people that fall in between these two dates....is this even possible???
Ex.
Joe March 3 to March 8
Mary March 4 to March 9
John March 5 to March 10
So if they type into the query March 3 to March 6 all three people should show up because one of the dates specified lies within the parameters they are asking for.....man I am out of ideas
Anyone.....
Hi
I want to add Hours to a date value.
For example the date value=05/04/2005 18:12:35
I want to add three hours to that date value so the new date value will be 05/04/2005 21:12:35. Is there operatior to add dates.
I want to search a table for records between two dates.
My code is like that
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim str As String
Dim Sdate As String
Dim Edate As String
Sdate = Me.txtBeginningDate
Edate = Me.txtEndingDate
Set db = CurrentDb()
str = "SELECT ID, Date, Item, QtyRec, QtyIssue FROM DailyIssue Where Date >= '" & SDate & "' AND DATE <='" & Edate &"'"
Set rs = db.OpenRecordset(str, dbOpenSnapshot)
But it is not working at all. Error message is Data Type Mismatch.
Any help is appreciated in advance.
rahulgty
i've been reading about the us/uk date problem and found some helpful threads such as http://www.access-programmers.co.uk/forums/showthread.php?t=39675 but would like to ask (cause i'm still a bit confused):
if someone enters all of the dates into an .mdb the same way, either day-month-year or month-day-year, will the dates somehow be stored correctly regardless of the system's setting? (in this case, entered day-month-year into u.s. system-settings).
i have seen how access flips "wrong" dates. if i understand correctly, the dates are then actually stored "flipped", or wrongly.
is there some way of making the wrong dates (the ones that have been flipped) right again?
also, how does one view the dbl-precision number that is stored?
I capture last change date on a form using now().
When I export the file my vendor wants the date to be a text field and 8 bytes in length. It has to fill 8 bytes like this - YYYYMMDD
Example in my form - 3/1/2007 8:11:55 AM
I need to convert this to text - 20070301 when I export my file.
thanks!
I have a date field in a table that I store dates in UK format, (DD,MM,YYYY). I have aform with a command buttong that is supposed to open another form at a particualr record based on the date field. However if the day part of the date field is over 12 then no record is returned. For example when trying for 02/11/07 I am assuming Access is looking for 11th Feb 2007. How do I solve this?
View 3 Replies View RelatedHi,
how would i set criteria on a query between 2 dates? i need to run a report every month between the dates 4th of current month and 5th of previous month. i wanted to either run this in code or set the criteria on the query but by setting the query criteria, it needs to pick up the current month.
a further question on this would be-
how would this work in 12 months? would it run the same query and collect 2 years worth of info or can it set with years too?
i was planning 2 options.
quick report ( click button and this months report is generated )
select report ( where they can select their desired period )
the dates will ALWAYS be the same and no other dates will be required.
any advice, graciously received.
thanks,
Nigel
I'm sure this is really easy - the database I am writing is for sales enquires with an anticipated completion date (month), but I also need to show which year. I would then want to concatenate these two fields and be able to produce a report that would list by date in ascending order. Can someome tell me the correct way to do this. Should the fields be text or date fields?
Thanks in anticipation.