Solved

Microsoft Access query

Posted on 2016-09-09
4
38 Views
Last Modified: 2016-09-09
I need this query to have the impound date always be greater than current date.  e.g. todays date is 9/9, so the impound date should be equal or greater than 8/9.

SELECT SoftSlips.SoftSlip, Species.Species, Breeds.Breed, SoftSlips.ColorNu, SoftSlips.OriginalName, SoftSlips.ImpoundCode, SoftSlips.Availability, SoftSlips.ImpoundDate, SoftSlips.Intake, SoftSlips.Weight, SoftSlips.Action, Placements.Kennel, Placements.PlacementDate, Placements.PlacementEndDate
FROM (Species INNER JOIN Breeds ON Species.SpeciesID = Breeds.SpeciesID) INNER JOIN (SoftSlips INNER JOIN qryLastPLacement AS Placements ON SoftSlips.SoftSlip = Placements.SoftSlip) ON (Species.SpeciesID = SoftSlips.SpeciesID) AND (Breeds.BreedID = SoftSlips.BreedID)
WHERE (((SoftSlips.ImpoundCode) Not In ("acord","acosd","ocsd","ocrd","rtn")) AND ((SoftSlips.ImpoundDate)>#8/1/2016#) AND ((SoftSlips.Intake)="south bay") AND ((SoftSlips.Weight) Is Null) AND ((SoftSlips.Action) Is Null))
ORDER BY Species.Species, SoftSlips.Intake;
0
Comment
Question by:jrsitman
  • 2
4 Comments
 
LVL 12

Assisted Solution

by:Jeff Darling
Jeff Darling earned 150 total points
ID: 41791733
use  > date()

SELECT SoftSlips.SoftSlip, Species.Species, Breeds.Breed, SoftSlips.ColorNu, SoftSlips.OriginalName, SoftSlips.ImpoundCode, SoftSlips.Availability, SoftSlips.ImpoundDate, SoftSlips.Intake, SoftSlips.Weight, SoftSlips.Action, Placements.Kennel, Placements.PlacementDate, Placements.PlacementEndDate
FROM (Species INNER JOIN Breeds ON Species.SpeciesID = Breeds.SpeciesID) INNER JOIN (SoftSlips INNER JOIN qryLastPLacement AS Placements ON SoftSlips.SoftSlip = Placements.SoftSlip) ON (Species.SpeciesID = SoftSlips.SpeciesID) AND (Breeds.BreedID = SoftSlips.BreedID)
WHERE (((SoftSlips.ImpoundCode) Not In ("acord","acosd","ocsd","ocrd","rtn")) AND ((SoftSlips.ImpoundDate)> date()) AND ((SoftSlips.Intake)="south bay") AND ((SoftSlips.Weight) Is Null) AND ((SoftSlips.Action) Is Null))
ORDER BY Species.Species, SoftSlips.Intake;

Open in new window

0
 

Author Comment

by:jrsitman
ID: 41791742
that won't work.  That means greater than today.  I didn't clarify.  I need it to be 30 days prior to current date.  Sorry
0
 
LVL 39

Accepted Solution

by:
als315 earned 350 total points
ID: 41791766
Try
SoftSlips.ImpoundDate)>Dateadd("d",-30, Date()).
But it will give you 10th of august, because we have 31 day in august.
You can use:
Dateadd("m",-1, Date())
it will give you one month
0
 

Author Closing Comment

by:jrsitman
ID: 41791799
Gave Jeff points because my question wasn't totally clear.
0

Featured Post

Comprehensive Backup Solutions for Microsoft

Acronis protects the complete Microsoft technology stack: Windows Server, Windows PC, laptop and Surface data; Microsoft business applications; Microsoft Hyper-V; Azure VMs; Microsoft Windows Server 2016; Microsoft Exchange 2016 and SQL Server 2016.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In Debugging – Part 1, you learned the basics of the debugging process. You learned how to avoid bugs, as well as how to utilize the Immediate window in the debugging process. This article takes things to the next level by showing you how you can us…
In a multiple monitor setup, if you don't want to use AutoCenter to position your popup forms, you have a problem: where will they appear?  Sometimes you may have an additional problem: where the devil did they go?  If you last had a popup form open…
What’s inside an Access Desktop Database. Will look at the basic interface, Navigation Pane (Database Container), Tables, Queries, Forms, Report, Macro’s, and VBA code.
With Microsoft Access, learn how to specify relationships between tables and set various options on the relationship. Add the tables: Create the relationship: Decide if you’re going to set referential integrity: Decide if you want cascade upda…

932 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now