---
title: "meny"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/7752-meny"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "elektron"
published: "2001-01-14T23:03:00.000Z"
updated: "2001-01-17T13:21:00.000Z"
replies: 4
views: 191
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/7752-meny"
---

# meny

## #1 — elektron, 2001-01-14T23:03Z

Jag har en asp sida som listar upp meddelanden, och varje meddelanade har ett subject. jag vill att man ska kunna trycka på ett subject och själva meddelande kommer upp under det och att alla andra meddelande förblir vanliga(visas endast med subject).
Den sak jag inte fattar är hur jag ska få så att meddelande kommer upp nedanför. [www.tilja.net](http://www.tilja.net)  har ett meny system och det ska vara någe liknande fast på det sätt jag förklarar.

Hoppas ni förstår frågan. Har lallat med asp kod hela kvällen så jag blivit kod blind.

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

## #2 — JE, 2001-01-15T11:03Z

Antar att du har alla meddelande sparat i en databas. 

Testa gör något i stil med detta. 

```
<%

'kod för anslutning till databasen
Set con = Server.CreateObject("ADODB.Connection")
con.ConnectionString = databaskoppling här
con.Open
Set rs = con.Execute("SELECT id, subject, message FROM tabell"

Do until rs.Eof
response.write "<a href=""sida.asp?id=""" & rs("id") & ">" & rs("subject") & "</a><br>"

If rs("id")=request.querystring("id") Then response.write "<br>" & rs("message")
rs.Movenext
Loop
%>
```

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

## #3 — Bj, 2001-01-17T07:14Z

Jag har testat med följande men den hittar inte det ID som tillhör meddelandet. Länken pekar på visa_rubrik.asp?ID=
Det borde vara ett nummer från ID också?
Någon som kan se var jag gjort fel?

\<%

	Set RecSet = Server.CreateObject("ADODB.Recordset")
   Addera = "SELECT TOP 5 \* FROM nyheter ORDER BY Id DESC"

   RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %\>

\<%	Do Until RecSet.EOF %\>

\<%
response.write "\<a href=""visa_rubrik.asp?id=""" & recset("id") & "\>" & recset("rubrik") & "\</a\>\<br\>"
If recset("id")=request.querystring("id") Then response.write "\<br\>" & recset("meddelande")
%\>

\<%	RecSet.MoveNext
	Loop
	RecSet.Close
	Connect.Close
%\>

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

## #4 — @nders, 2001-01-17T07:17Z

så här borde det väl se ut:

```
response.write "<a href=""visa_rubrik.asp?id=" & recset("id") & """>" & recset("rubrik") & "</a><br>"
```

observera att jag endast flyttat ett par citationstecken från direkt efter ?id= till direkt före slut på \<a href-taggen. det är alltså citationstecken som är felplacerade i din kod.

mvh,

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

## #5 — SPiN, 2001-01-17T13:21Z

Eller så kan du använda JE's kod och bara konvertera QueryStringen id till number, för den hämtas som en string...
Ex:
If rs("id")=cInt(request.querystring("id")) then...

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/7752-meny