02. august 2002 - 15:31Der er
7 kommentarer og 2 løsninger
Select ???
Hejsa !
Jeg skal bruge en Select sætning der kan vælge udfra en formular hvori ugerne 1, 2, 3........52 der skal ske i udvælgelsen er at den skal samle summen er feltet amount fra datoerne i f.eks uge 13
håber der er nogen der har et indput eller to til dette
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
' Funktion der kan finde start og slutdato i en bestemt uge
function FirstDateInWeek(AYear, AWeek) ' Find første dato i uge 1 i år VD = DateSerial(AYear, 1, 1) ' Da DatePart uge 1 starter den 01-01-Year så kør frem til uge 2 do while DatePart("ww", VD) <> 2 VD = DateAdd("d", 1, VD) loop ' Gå en uge tilbage og vi har første dato i uge 1 VD = DateAdd("ww", -1, VD) ' Adder antallet uger og vi har første dato i uge: AWeek VD = DateAdd("ww", AWeek - 1, VD) ' Korriger for ugestart fra Søndag til Mandag FirstDateInWeek = DateAdd("d", 1, VD) end function
TheYear = 2002 ' Det ønskede årstal TheWeek = 15 ' Den ønskede uge FirstDate = FirstDateInWeek(TheYear, TheWeek) LastDate = DateAdd("ww", 1, FirstDate) ' Response.Write("Uge: " & TheWeek & " i år: " & TheYear & " ligger fra den: " & FirstDate & " til den: " & LastDate & "<br>")
strSQL = "select sum(amount) from tabelnavn where dato>=#" & FirstDate & "# and dato<=#" & LastDate & "#"
%>
Det kan være at datoformaterne i SQL-sætningen skal ændres
Og den med datoerne finder jeg ud af det er til en Sql server og så er det jo ikke #" & FirstDate & "# men noget i stil med '" & Firstdate & "' så det ordner sig nok. Jeg kan ikke tjekke scriptet før i aften så jeg lader det stå åbent til da :-))
Oki vi deler i porten det var ikke helt korrekt det du men noget af det kunne jeg bruge :-)
Synes godt om
Ny brugerNybegynder
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.