Jag har én kommunity dör ett datum sparas då man loggar in det e både år, månad, dag, timmar, minuter och seckunder. Men om jag sen skulle vilja kålla hur länge det e mellan den tiden som e i databasen och vad klockan en nu hur görj jag då. Vill häst ha skillnaden i bara minuter. Det ska bli ett skript som kållar hur många minuter man varit online.

Tjenare,
Använd datediff funktionen

<code>
Dim lastLoggedOn
Dim datNow
Dim diffInMinutes

datNow = now()
lastLoggedOn = CDate("2002-10-01 12:15:45")
'** Här anger du klockslaget från databasen
'** lastLoggedOn = rs("lastloggedOn")

diffInMinutes = datediff("n",lastloggedOn,datNow)

Gjorde en liten sak medans kaffet rann klart.
<%
Function diffTime(dTimeStart,dTimeEnd,sUnit)

Select case sUnit
case "min"
i = "n"
case "tim"
i = "h"
case "dag"
i = "d"
case else
i = "n"
End Select

diffTime = datediff(i,CDate(dTimeStart),CDate(dTimeEnd))
End Function
%>
<%=diffTime("2002-10-01 12:15:45",now(),"min")%>

//Putte
</code>

Hur ska hela koden se ut om jag ska hämta tiden från <%=RecSet("date")%>

Du kan ju istället skriva;
<code>
<%=DateDiff("n", RecSet("date"), Now()) %>
</code>

Har den här koden nu men den visar tiden 36396


<%
Function diffTime(dTimeStart,dTimeEnd,sUnit)

Select case sUnit
case "min"
i = "n"
case "tim"
i = "h"
case "dag"
i = "d"
case else
i = "n"
End Select

diffTime = datediff(i,CDate(dTimeStart),CDate(dTimeEnd))
End Function
%>

(<%=DateDiff("n", RecSet("datum"), Now()) %>)

Jag har lagt in tiden med en dateadd om ni undrar

Tjena,
Glöm funktionen jag gjorde...det var bara ett lamt försök att visa de olika enheterna.

(<%=DateDiff("n", RecSet("datum"), Now()) %>) skall funka.

Testa med andre enheter då. Se om du får något annat värde

"h" = tim tex.

Är du säker på att RecSet("datum") är ett giltigt datum? Kanske du skall köra en CDate(RecSet("datum").

//Putte