DateDiff dinamico

[pazzo2]

Ciao ragazzi
una una campo data e vorrei calcolare la differenza. La vorrei calcolare in questo modo però..

se la differenza è inferiore a 60 minuti la calcolo in minuti
se superiore a 60 minuti in ore e minuti..

ad esempio

supponiamo che l'orario attuale è 14.24

se nel db ho 16.20 il risulato è 4minuti
se nel db ho 15.20 il risultato è 1h 4 minuti

ho creato una funzione per il primo caso ma mi manca il secondo:
' FUNZIONE DIFFERENZA DATA'
function diff_data(data)
differenza=datediff("N",rs("data_inserimento"),now ())
if differenza<60 then
differenza=differenza&" m."
else
differenza=datediff("h",rs("data_inserimento"),now ())&" h."
end if
diff_data=differenza
end function

a presto

[willybit]

ciao pazzo2,

fa il conto sui minuti

function diff_data(dataora1,dataora2)
  minuti = DateDiff("N",dataora1,dataora2)
  strOreMinuti = ""
  if minuti>=60 then
    strOreMinuti = (minuti\60) & "h "
    minuti = minuti-(minuti\60)*60
  end if
  strOreMinuti = strOreMinuti & minuti & "m"
  diff_data = strOreMinuti
end function

[pazzo2]

ok grazie ho provato e funge benissmo bravo!

a presto