---
title: "redirect efter 30 sek till nästa post i kolumen?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/104530-redirect-efter-30-sek-till-nästa-post-i-kolumen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "magnusfeldth"
published: "2004-05-28T20:51:44.000Z"
updated: "2004-11-11T15:13:04.000Z"
replies: 8
views: 398
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/104530-redirect-efter-30-sek-till-nästa-post-i-kolumen"
---

# redirect efter 30 sek till nästa post i kolumen?

## #1 — magnusfeldth, 2004-05-28T20:51Z

hur skriver man en kod för att få sidan att redirectas till en sida med databasposten innan efter 30 sek?

alltså, man är på sidan text.asp?id=5
efter 30 sek hoppar den vidare till text.asp?id=4

osv, så går den i alla steg som inte passerat en expiry date, därefter går den vidare till första posten igen och går igen allt igen...

några förslag?

Permalänk: https://www.webforum.nu/p/104530

## #2 — Jesper T, 2004-05-29T13:40Z

Response.AddHeader "REFRESH","30;URL=text.asp?id="&id

Permalänk: https://www.webforum.nu/p/1358563

## #3 — magnusfeldth, 2004-11-11T11:43Z

Men hur gör man så att den börjar på den tråden som är nyast och sedan gör en redirect till nästa tråd som inte passerat en expiry date som skrivs i en kolumn i en accessdatabas?

Alltså, att den börjar på exempelvis ID=32, efter trettio sekunder går den vidare till ID=30 (eftersom ID=31 har redan passerat sin expiry date) och så fortsätter den, tills den kommit ner till ID=1 då den går tillbaka till senaste...

Permalänk: https://www.webforum.nu/p/1482504

## #4 — Jesper T, 2004-11-11T11:57Z

Skall det vara alla eller skall du specificera hur måga poster den skall visa?

Permalänk: https://www.webforum.nu/p/1482510

## #5 — magnusfeldth, 2004-11-11T12:19Z

Alla poster som alltså är inom kolumnposten expirydate

Permalänk: https://www.webforum.nu/p/1482524

## #6 — Jesper T, 2004-11-11T12:43Z

Hämta posterna med getRows kanske.

Permalänk: https://www.webforum.nu/p/1482541

## #7 — Jesper T, 2004-11-11T12:52Z

Pseudo-kod.
Lägg till en räknare som du plussar på med 1 för varje omladdning, nollställ om det är slut på poster.

```
		If not myRecSet.EOF then myGetRows = myRecSet.getrows()
		
		If IsArray(myRecSet) then
			If counter > ubound(myRecSet,2) then counter=0
				Response.write myGetRows(0,counter) & " " & myGetRows(1,counter)
                            counter=counter+1	
		Else
			Response.write "Det finns inga poster!"
		End if
```

Permalänk: https://www.webforum.nu/p/1482545

## #8 — magnusfeldth, 2004-11-11T14:44Z

Förstår inte riktigt hur du menar, är inte så haj på GetRows... kan du skriva mer av koden? Hur nollställer jag om det är slut på poster?

Permalänk: https://www.webforum.nu/p/1482614

## #9 — Jesper T, 2004-11-11T15:13Z

Nollställer gör jag ju i den bifogade koden.
Skapa ett RecSet som vanligt hämta raderna med getRows.
select id,namn,datum from ...
counter=0
Response.write myGetRows(0,counter) & " "& myGetRows(1,counter)
Innebär att post ett:s id och namn skall skrivas ut

```
counter = Request.QueryString("counter")
...Annan kod
'Response.AddHeader "REFRESH","30;URL=sida.asp?counter="& counter
'...Annan kod
```

```
		Dim calConn,calRS
		Set calConn = Server.CreateObject("ADODB.Connection") 
		calConn.Open "Öppna databas"
		Set calRS = calConn.Execute("select id, namn, etc from tabell where date > now()")
		If not calRS.EOF then arrUgRS = calRS.getrows()
		calRS.Close : Set calRS = Nothing
		calConn.Close : Set calConn = Nothing
		
		If IsArray(myRecSet) then
				Response.write myGetRows(0,counter) & " " & myGetRows(1,counter)
				
		Else
			Response.write "Det finns inga poster!"
		End if
```

Du får labba lite.

Permalänk: https://www.webforum.nu/p/1482635

---

Tråden på webben: https://www.webforum.nu/amne/asp/104530-redirect-efter-30-sek-till-nästa-post-i-kolumen