---
title: "Recordset med olika visningsformat"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/169568-recordset-med-olika-visningsformat"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "JPS"
published: "2008-03-03T11:46:43.000Z"
updated: "2008-03-03T12:59:23.000Z"
replies: 3
views: 399
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/169568-recordset-med-olika-visningsformat"
---

# Recordset med olika visningsformat

## #1 — JPS, 2008-03-03T11:46Z

Jag har en sida där jag skall presentera data med olika format enligt följande:

Jag har ett recordset med paging där data skall presenteras olika dels beroende på format 1-Annons stor, 2-Annons mellan, 3-Annons liten dels i tabellformat med formatering. 

1\. Annons stor - skall listats först och på en rad var.

Annons Olle
Annons Anna
Annons Nisse

2\. Annons mellan - listas i tabell med 2 i bredd och en cell mellan som marginal.

```
<table>
<tr>
	<td>Annons Ulla</td>
	<td>marginal</td>
	<td>Annons Jan</td>
</tr>
<tr>
	<td>Annons Nisse 2</td>
	<td>marginal</td>
	<td>Annons Peter</td>
</tr>
</table>
```

 

3\. Annons liten - listas i precis som ovan men sist.

```
<table>
<tr>
	<td>Annons Ulla</td>
	<td>marginal</td>
	<td>Annons Jan</td>
</tr>
<tr>
	<td>Annons Nisse 2</td>
	<td>marginal</td>
	<td>Annons Peter</td>
</tr>
</table>
```

 

4\. Här kommer paging

Jag har kört helt fast så tips på kod tas tacksamt emot!

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

## #2 — voigtann1, 2008-03-03T12:09Z

```
<%
dim iAd
Do until.RecSet.EOF
	iAd = iAd + 1

	'... Din kod här
	If iAd mod 10 Then
		'Var 10:e post kommer en ny annons
		Response.Write "<tr><td colspan=""2"">Besök en annons!</td></tr>"
	End If
	RecSet.MoveNext
Loop
%>
```

Eller ha en funktion som väljer ut en slump banner istället för 

```
Response.Write "<tr><td colspan=""2"">Besök en annons!</td></tr>"
```

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

## #3 — JPS, 2008-03-03T12:42Z

Tack för svaret men det är inte så jag menar. Annonserna behöver skrivas ut med olika format och annons stor före, mellan o.sv.

ANNONS STOR
ANNONS STOR
Annons mellan  Annons mellan
Annons mellan  Annons mellan
Annons mellan  Annons mellan
Annons liten Annons liten
Annons liten Annons liten

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

## #4 — voigtann1, 2008-03-03T12:59Z

Det är ju bara att bygga vidare på koden.

```
<%
dim iAd, b
Do until.RecSet.EOF
	iAd = iAd + 1

	'... Din kod här
	If iAd mod 10 Then
		b = b + 1
		Select Case b
			Case 1
				Response.Write "<tr><td colspan=""2""><h1>Stor annons</h1></td></tr>"
			Case 2
				Response.Write "<tr><td colspan=""2""><h2>Mellan annons</h2></td></tr>"
			Case else
				Response.Write "<tr><td colspan=""2""><h3>Liten annons</h3></td></tr>"
		End Select
		
		'Var 10:e post kommer en ny annons
	End If
	RecSet.MoveNext
Loop
%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/169568-recordset-med-olika-visningsformat