find tid mellem datoer

Det var nu nemmere, hvis du havde lagt dine datoer ind i et datofelt i stedet for i 3 forskellige felter. Men prøv følgende:

Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open "Select dg, md, yyyy From Tabel Order By yyyy, md, dg", MyConn, 1
Dato1 = rs("dg") & "-" & rs("md") & "-" & rs("yyyy")
rs.MoveLast
Dato2 = rs("dg") & "-" & rs("md") & "-" & rs("yyyy")

GnmForskel = DateDiff("d", Dato1, Dato2) / rs.RecordCount

nu giver det mig jo ikke gennemsnitet vel, men kun forskellen mellem den første og sidste dato. Jeg har også datoerne lagt i et dato-felt, hvis det hjælper.

Forskellen mellem første og sidste dato divideret med antallet af poster. Det må efter min bedste overbevisning give dig gennemsnittet.

Men den skal nok hedde:

rs.RecordCount - 1

Men så prøv følgende i stedet:

Set rs = MyConn.Execute("Select Dato, Min(Dato) As MinDato, Max(Dato) As MaxDato, Count(Dato) As Antal From Tabel Group By Dato")
GnmForskel = DateDiff("d", rs("MinDato"), rs("MaxDato")) / (rs("Antal") - 1)

nå ja, stupid me.

kigger lige lidt på det. :)

ikke haft tid til at kigge på det, men alle min sp lukkes inden nytår :)

God stil ;o) Tak for points :)