datumfunktion

jag kan inte tänka själv längre, behöver hjälp med en function.

en timme består ju av 4 st 15 minuters intervaller
vilket betyder att ett dygn består av 96 st (4*24)

nu behöver jag en funktion där jag skickar in ett klockslag och får ut vilken intevall det är. (1-96)

ex: jag skickar in 00:45 och får ut 3

Konvertera timmar till minuter och addera dom övriga minutrarna till detta. Svaret och en heltalsdivision med 15 ger dig ditt intervall.

Ex.: 11:56 => 11*60 + 56 = 716 (minuter)
716 / 15 = 47

red.
Fast för att få det i intervallet 1 till 96 måste du addera 1 till svaret.

Åhh, tackar! :)
Färdig kod om nån annan behöver.

Public Function getInterval(strTime)
	Dim intHour, intMinute, intTotalMinutes
	intHour = Hour(strTime)
	intMinute = Minute(strTime)
	intTotalMinutes = (intHour *60) + intMinute
	getInterval = Fix((intTotalMinutes/15) + 1)
End Function

Response.Write(getInterval("00:24"))