Ugedag og dato ønskes udtrukket for hver dag
Jeg har en bunke data, der bliver logget hver dag. Her imellem er der også ugedag og dato,Alle ugedage og datoer bliver sammen med de øvrige data trukket ud i rækker gennem en løkke:
If Not RSLog1.EOF Then
Do Until RSLog1.EOF
[Ugedag] [Dato] [Data1] [Data2] [Data3] [Data4] [Data5]
RSLog1.MoveNext
Loop
End If
For at gøre det lidt mere overskueligt, kunne jeg godt tænke mig at adskille alle disse data delt op for hver dag.
Da der kommer en ny søndag om en uge, vil jeg gerne have sat datoen på bag hver ugedag, så det i stedet kommer til at se sådan her ud:
Søndag den 11. september 2016
If Not RSLog1.EOF Then
Do Until RSLog1.EOF
[Data1] [Data2] [Data3] [Data4] [Data5]
RSLog1.MoveNext
Loop
End If
Mandag den 12. september 2016
If Not RSLog1.EOF Then
Do Until RSLog1.EOF
[Data1] [Data2] [Data3] [Data4] [Data5]
RSLog1.MoveNext
Loop
End If
Tirsdag den 13. september 2016
If Not RSLog1.EOF Then
Do Until RSLog1.EOF
[Data1] [Data2] [Data3] [Data4] [Data5]
RSLog1.MoveNext
Loop
End If
Onsdag den 14. september 2016
If Not RSLog1.EOF Then
Do Until RSLog1.EOF
[Data1] [Data2] [Data3] [Data4] [Data5]
RSLog1.MoveNext
Loop
End If
Osv.
Dvs. der køres en løkke med ugedag/dato, og inde i den løkke køres der en ny løkke med de unikke data for den unikke dag.
Jeg har prøvet med alle mulige forsøg, som f.eks. SELECT DISTINCT ugedag, dato, relation til en tabel: SELECT child WHERE weekdayID = 1 (for mandag)
weekdayID weekdayname
1 Mandag
2 Tirsdag
3 Onsdag
4 Torsdag
5 Fredag
6 Lørdag
7 Søndag
Men det bliver en gang rod. Hvordan gør jeg?
