find årsforbrug ud fra forskellige datoer

sql = "SELECT * " & _
      "FROM maalinger " & _
      "WHERE dato BETWEEN dateadd('d', -365, now) AND now " & _
      "ORDER BY dato DESC"
'
'... data hentes fra databasen, dvs. connect, execute og alt det der knald
'

sum = 0
maalinger = 0
forrigeDato = empty
do while not rs.eof
  maalinger = maalinger + 1
  aktuelleDato = rs("dato")
  aktuelleMaaling = rs("maaling")

  if not isempty(forrigeDato) then
      dage = datediff("d", forrigeDato, aktuelleDato)
      enheder = aktuelleMaaling - forrigeMaaling
      sum = sum + (enheder / dage)
  end if

  forrigeDato = aktuelleDato
  forrigeMaaling = aktuelleMaaling

  rs.movenext
loop
gns = sum / maalinger

'
' rs lukkes, connection lukkes og objekter nedlægges
'