Hej,
jag undrar om det är någon som har en bra lösning till mitt problem... jag vill ha en funktion som räknar ut hur många timmar&minuter det är kvar till en viss tidpunk varje vecka. T.ex så det står hur lång tid det är kvar till "Rederiet" varje vecka? alltså kl 20.00 på Torsdag.
det är ju fortfarande bara det att den visar hur lång tid det är kvar till ett visst datum... man kan INTE ställa in en viss tidpunk på dygnet vad jag vet... hur gör man det? det är det jag vill veta!
nu kom jag på att man kan ju bara addera timtalet 20 om man vill att det ska vara 20.00 den dagen... men det återstår fortfarande problemet med hur man ska göra för att räkna ut vilket datum som t.ex "nästa fredag" är på.
Nej, jag håller med att dom missförstår vad du vill.
Jag skrev en generell funktion
function reidar(current,dayNo,strtime)
dim today,d,days,sendDate
today = weekday(current,vbSunday)
if today < dayNo then
days = dayNo - today
elseif today = dayno then
if datepart("h",current) < cint(left(strtime,2)) then
days = 0
else
days = 7
end if
else
days = 7 - (today - dayNo)
end if
d = formatDateTime(dateadd("d",days,current),vbShortDate)
sendDate = cdate(d & " " & strtime )
reidar = datediff("n",current,sendDate)
end function
Du kan använda den så här
session.lcid = 1053
m = reidar(now(),vbThursday,"20:00:00")
h = int(m/60)
m = m mod 60
response.write "Timmar = " & h & " minuter = " & m & "<br>"
för att få fram antal minuter till klockan 20:00 närmsta torsdag från nu.
------------------ essentitia preter non sans multiplicandum