Avatar billede -anders- Juniormester
22. maj 2004 - 20:07 Der er 21 kommentarer og
2 løsninger

Vis poster for aktuel uge

Hej Eksperter

Jeg har en forespørgsel "fsoversigt", i denne er der et felt "Dato". Jeg har så en form "frmoversigt" på denne form har jeg en liste "lstoversigt", denne liste for data fra "fsoversigt". Jeg vil gerne sætte en knap på denne form, når jeg klikker på knappen skal "lstoversigt" vise alle poster der er i "fsoversigt" for den aktuelle uge. så det er noget med en beregning på feltet "Dato" i forhold til aktuel uge, måned og år, er dette muligt, håber nogen kan hjælpe.
mvh Anders.
Avatar billede mugs Novice
22. maj 2004 - 20:11 #1
Lav et udtryk i din forespørgsel ved DatePart:

Udtryk1: DatePart("w";[Dato1])

Dette udtryk vil nu vises so ugenr. beregnet ud fra dato-feltet. Indsæt herefter dit kriterie i forespørgslen.
Avatar billede -anders- Juniormester
22. maj 2004 - 20:14 #2
Hej mugs, tak for indlægget, men jeg vile helst styre det via vba , da lstoversigt som standard viser alle poster
Avatar billede mugs Novice
22. maj 2004 - 20:16 #3
Du kan også lave en datepart i VBA:
dim a As long
a = DatePart("w",Dato1)
Avatar billede -anders- Juniormester
22. maj 2004 - 20:18 #4
Ok, men hvordan kæder så nedenstående vba samme:
Me.lstoversigt.roesource = "Select * From fsoversigt Where ........................
Avatar billede mugs Novice
22. maj 2004 - 20:20 #5
Det ved jeg godt nok ikke.
Avatar billede -anders- Juniormester
22. maj 2004 - 20:21 #6
Hæ hæ, nej det er dette der er problemet for mig også, lar det stå lidt åbnet endnu ,måske der kommer andre indlæg, men tak for forsøget
Avatar billede terry Ekspert
23. maj 2004 - 09:59 #7
Me.lstoversigt.recordsource = "Select * From fsoversigt WHERE (((DatePart("ww",[dato],2,2))=DatePart("ww",Date(),2,2)));
Avatar billede terry Ekspert
23. maj 2004 - 10:01 #8
and I think you need a " at the end of that
23. maj 2004 - 10:31 #9
Jeg kan anbefale at bruge Format i stedet for Datepart:

Me!lstoversigt.recordsource = "Select * From fsoversigt WHERE Format(dato,"ww") = Format(Date(), "ww")
Avatar billede -anders- Juniormester
23. maj 2004 - 11:56 #10
Hej, Thomas, har testet dit forslag, men den fejler på den første "ww", måske syntaxen skal være anderledes
Avatar billede -anders- Juniormester
23. maj 2004 - 12:07 #11
Har nu også testet forslag fra Terry, men den fejler samme sted
Avatar billede terry Ekspert
23. maj 2004 - 12:25 #12
I'll take a look at your dB if yiou can send it?
eksperten@NOSPAMsanthell.dk

remove NOSPAM
Avatar billede -anders- Juniormester
23. maj 2004 - 12:27 #13
Okay, kan sagtens sende den, men når du sender den tilbage må du gerne sende den som en anden filtype, elleres kan min mail ikke modtage den
Avatar billede terry Ekspert
23. maj 2004 - 12:29 #14
is ZIP ok or should I just rename it?
Avatar billede -anders- Juniormester
23. maj 2004 - 12:30 #15
Sendt
Avatar billede terry Ekspert
23. maj 2004 - 12:30 #16
Thomas, does format take into account the first day of the week etc?
Avatar billede -anders- Juniormester
23. maj 2004 - 12:31 #17
Ved det ikke lige, min mail driller en del for tiden, efter en reinstallation af pc. så en rename måske
Avatar billede terry Ekspert
23. maj 2004 - 12:35 #18
I have received your mail, back soon.
Avatar billede terry Ekspert
23. maj 2004 - 12:39 #19
Because there are " in the SQL thenwe have to use two

Function visdenneuge()
Forms!frmoversigt.lstoversigt.RowSource = "Select * From fsoversigt WHERE (((DatePart(""ww"",[dato],2,2))=DatePart(""ww"",Date(),2,2)));"
End Function
Avatar billede -anders- Juniormester
23. maj 2004 - 12:46 #20
Hej Terry, bingo så var den der, det ikke så let at finde rundt i alle de () og " e.t.c Jeg regner med at det er samme subtax når jeg skal den aktuelle måned. Tak for hjælpen endnu engang, points er på vej til dig. Også tak for de andre indlæg

mvh Anders.
Avatar billede terry Ekspert
23. maj 2004 - 12:50 #21
You can use datepart and use ""m"" insread of ""ww"" but you can also use

Month([Dato])
Avatar billede -anders- Juniormester
23. maj 2004 - 12:52 #22
Okay, arbejder videre herfra, endnu en tak for hjælpen, hæ hæ har altid haft svært ved at håndtere datoberegninger
Avatar billede terry Ekspert
23. maj 2004 - 17:25 #23
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester