---
title: "hämta data till dropdown ruta"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/145548-hämta-data-till-dropdown-ruta"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Vinnaren"
published: "2006-04-14T10:59:19.000Z"
updated: "2006-04-16T08:21:36.000Z"
replies: 8
views: 497
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/145548-hämta-data-till-dropdown-ruta"
---

# hämta data till dropdown ruta

## #1 — Vinnaren, 2006-04-14T10:59Z

Hej. 

Undrar hur man gör för att hämta info från en tabell till EN dropdown ruta. Det är länkar som när man trycker på visa så kommer man till den sidan. 

har börjat lite själv men får upp flera dropdown rutor samt så funkar det inte att trycka på knappen visa. 

```

  <%...%>
  <%
Set Conn = Server.CreateObject("ADODB.Connection")
Set news = Server.CreateObject("ADODB.Recordset")

Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../db/databas.mdb")
SQL = "SELECT TOP 15 * From klubbar Order By klubb ASC"
news.Open SQL, Conn, 1, 2

If news.EOF Then
  Response.Write "Tomt"
Else

Do While Not news.EOF
%>

    <form method="POST">
        <p><select size="1" name="D1">
        
        
    <a href="fakta.asp?visa=<%=news("id")%>&titel=<%=news("klubb")%>');">    
<option><%=news("klubb")%></option>
        
        
        </select><input type="button" value="Visa" name="B1"></p>
    </form>

      

<%...%>
<%
news.MoveNext
Loop
news.Close
Conn.Close
Set news = Nothing
Set Conn = Nothing
End If
%>
```

 

Hur får jag det att fungera?? :S 

Tacksam för all hjälp jag kan få

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

## #2 — @nders, 2006-04-14T11:45Z

1) Flytta ut följande:

```
    <form method="POST">
        <p><select size="1" name="D1">
```

, så de raderna inte ligger i loopen, utan före.
2) Flytta också ut följande:

```
        </select><input type="button" value="Visa" name="B1"></p>
    </form>
```

, så det inte ligger i loopen, utan efter.

Till sist; du skriver att det inte funkar att klicka på visa-knappen. Vad hade du tänkt skulle hända? En "button" utför ingenting, om man inte lägger på ett onclick-event. Eller är det en input av typen *submit* du vill ha?

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

## #3 — Vinnaren, 2006-04-14T12:48Z

När man trycker på knappen "visa" så ska man komma till en ny sida.
Har just nu länkarna på en sida men vill nu istället ha dem i en dropdown ruta.

länkarna på den sidan presenteras:

```
 <td width="360" class="rubrik1" height="20"><a href="fakta.asp?visa=<%=news("id")%>&titel=<%=news("klubb")%>');">
	<font face="Verdana" size="2"><%=news("klubb")%></font></a></td>
```

 :OO

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

## #4 — @nders, 2006-04-15T06:31Z

I din loop:

```
<option value="fakta.asp?visa=<%=server.urlencode(news("id"))%>&titel=<%=server.urlencode(news("klubb"))%>"><%=news("klubb")%></option>
```

Utanför:

```
<input type="button" onclick="location.href=document.getElementById('D1').value;" value="Visa">
```

Lägg också till *id="D1"* i din \<select\>.

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

## #5 — Vinnaren, 2006-04-15T07:46Z

ok, tack. men får att inte att fungera redigt. får följande felmeddelande:

Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A0400)
Programsats förväntas.
/test/meny.asp, line 14
\<form method="POST"\>

hela koden:

```

  <%
Set Conn = Server.CreateObject("ADODB.Connection")
Set news = Server.CreateObject("ADODB.Recordset")

Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../db/databas.mdb")
SQL = "SELECT TOP 15 * From klubbar Order By klubb ASC"
news.Open SQL, Conn, 1, 2

If news.EOF Then
  Response.Write "Tomt"
Else

<form method="POST">
		<p><select size="1" name="D1">
		
Do While Not news.EOF
%>

	
		
		
<option value="fakta.asp?visa=<%=server.urlencode(news("id"))%>&titel=<%=server.urlencode(news("klubb"))%>"><%=news("klubb")%></option>		
		
		

      
<%
news.MoveNext
Loop
news.Close
Conn.Close
Set news = Nothing
Set Conn = Nothing
End If
%>

</select><input type="button" onclick="location.href=document.getElementById('D1').value;" value="Visa"></form>
```

vad kan det vara för fel??

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

## #6 — @nders, 2006-04-15T08:40Z

Du kan inte lägga html-koden i asp-koden, utan du måste bryta med contextswitchar.

```
<%
asp-kod här
%>
html-kod här
<%
asp-kod här
%>
```

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

## #7 — Vinnaren, 2006-04-15T12:41Z

okej. hur ska det vara då??

såhär:

```

  <%
Set Conn = Server.CreateObject("ADODB.Connection")
Set news = Server.CreateObject("ADODB.Recordset")

Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../db/databas.mdb")
SQL = "SELECT TOP 15 * From klubbar Order By klubb ASC"
news.Open SQL, Conn, 1, 2

If news.EOF Then
  Response.Write "Tomt"
Else

<form method="POST">
		<p><select size="1" name="D1">
Do While Not news.EOF
%>
	
<html>
<body>

		

	
		
<option value="fakta.asp?visa=<%=server.urlencode(news("id"))%>&titel=<%=server.urlencode(news("klubb"))%>"><%=news("klubb")%></option>		
		
		

      
<%
news.MoveNext
Loop
news.Close
Conn.Close
Set news = Nothing
Set Conn = Nothing
End If
%>

</select><input type="button" onclick="location.href=document.getElementById('D1').value;" value="Visa"></form>

</body>
</html>
```

??  :q

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

## #8 — @nders, 2006-04-16T05:48Z

Exempel:

```
If news.EOF Then
  Response.Write "Tomt"
Else
%>
<form method="POST">
		<p><select size="1" name="D1">
Do While Not news.EOF
%>
<option value="fakta.asp?visa=<%=server.urlencode(news("id"))%>&titel=<%=server.urlencode(news("klubb"))%>"><%=news("klubb")%></option>	
<%
news.movenext
loop
%>
</select>
<input type....>
</form>
<%
end if
%>
```

Alltså. ASP-koden skall vara mellan \<% och %\>, men där kan du inte skriva HTML-kod.

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

## #9 — Vinnaren, 2006-04-16T08:21Z

ok, tack, det fungerar nu :D

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/145548-hämta-data-till-dropdown-ruta
