Udregning af REFRESH parameter.

Jeg vil ikke påstå, jeg forstår spørgsmålet, men jeg tror, du søger noget i stil med nedenstående at tage udgangspunkt i:

<%
If Session("SidsteReload") = "" Then Session("SidsteReload") = DateAdd("s", -30, Now)

Sekunder = DateDiff("s", Session("SidsteReload"), Now)
If Sekunder >= 30 Then Session("SidsteReload") = Now
%>

<META HTTP-EQUIV="REFRESH" CONTENT="<% = Sekunder %>">

Prøver at forklare det bedre så. :)

Min server opdaterer statestikkerne hvert 5. minut.
Den gør det f.eks kl:
10:00
10:05
10:10
10:15 osv

Der skal ASP delen så regne ud hvor meget der skal skrives for at brugeren reloader på det rigtige tidspunkt.
Opdatering - Reload
10:00:00 - 10:00:30
10:05:00 - 10:05:30
10:10:00 - 10:10:30
10:15:00 - 10:15:30

sådan så ASP delen skal først finde ud af hvor lang tid der er til at klokken er ??:00:00, ??:05:00, ??:10:00, ??:15:00, osv

Og dertil skal den så ligge 30 sek til.

F.eks brugeren går ind på siden kl. 10:04:00 så skal ASP regne ud at der er 60 sek til klokken er 10:05:00, og så skal den så ligge 30 sek til sådan så der kommer til at stå <META HTTP-EQUIV="REFRESH" CONTENT="90"> fordi så vil browseren reloade kl 10:05:30

Fik jeg det bedre forklaret nu?

Ja, det synes jeg bestemt. Prøv følgende:

StartTidspunkt = "24-12-2003 10:04:00" '<---Her kommer brugeren ind på siden

For i = 0 To 4
  NytTidspunkt = DateAdd("n", +i, StartTidspunkt)
  If Minute(NytTidspunkt) Mod 5 = 0 Then Exit For
Next

NytTidspunkt = Left(NytTidspunkt, Len(NytTidspunkt) - 2) & "30"

AntalSek = DateDiff("s", Now, NytTidspunkt)

Hvad så hvis han kommer ind 10:03:23? eller 10:01:54? eller 10:04:23?

Finder den så også ud af at få det regnet ud?

Jeg har skrevet det sådan. For at teste det.

<%

For i = 0 To 4
  NytTidspunkt = DateAdd("n", +i, StartTidspunkt)
  If Minute(NytTidspunkt) Mod 5 = 0 Then Exit For
Next

NytTidspunkt = Left(NytTidspunkt, Len(NytTidspunkt) - 2) & "30"

AntalSek = DateDiff("s", Now, NytTidspunkt)

Response.Write AntalSek
%>

Men det giver fejl på linie 10.

det er AntalSek = DateDiff("s", Now, NytTidspunkt)

Ja, hensigten er, at enhver dato/klokkeslæt skal rundes op til nærmeste minuttal deleligt med 5. Hertil påhæftes et sekundtal på 30.

Okay - prøv lige at udskrive NytTidspunkt i stedet for AntalSek, så vi kan se, hvad der returneres.

Skal lige i bad...

Så henter jeg kæresten i mellemtiden :)

Færdig! ;o)

Jeg er her også... har du icq eller noget? ville være lidt lettere...
ICQ: 39789880
MSN: bloodhound@sexmagnet.com

Nej, men jeg prøver lige at teste det selv, når jeg kommer hjem.

Ok, jeg må smutte. Men tjekker nok igen senere i aften. eller senest imorgen tidlig.

Jeg har fået hjælp af en anden, og det virker...

Men efter som du begyndte at hjælpe mig, så før du alligevel point selv om du ikke nåede at lave den komplette løsning :)

Okay, jeg siger tak. Hvor lå fejlen så?

Ved det ikke, jeg fik en løsning som er lavet på en helt anden måde...
Nu må jeg så til at læse om den måde den er lavet på så jeg selv kan lave noget lignende. :)