---

Hej

Jeg sidder i øjeblikekt og roder med en <select> hvor der naturligvis er en
række muligheder. Den valgte skal dog være en værdi der er tukket ud af en
Access 2000 DB

Jeg har forsøgt nedenstående, men den er ligeglad med mit forsøg: VALUE="""
& rs("Stil") & """

Der der nogen der har en idé til, hvordan det kan løses ?

Klaus

function hentopskrift()

%>
<table>
<form ACTION="<%= Request.ServerVariables ("SCRIPT_NAME") %>" METHOD="POST"
id="form1" name="form1">
<%

Out "<tr><td>Ølnavn:<td> <input TYPE=""TEXT"" Size=""40"" NAME=""Navn""
VALUE=""" & rs("Olnavn") & """>"
Out "<tr><td>Ølstil<td><select Name=""Stil"" VALUE=""" & rs("Stil") & """>"
Out "<option Value=""Barley Wine""> Barley Wine"
Out "<option Value=""Abbey Ale""> Abbey Ale"
Out "<option Value=""Hvede øl""> Hvede Øl"
Out "<option Value=""English Ale""> English Ale"
Out "<option Value=""American Ale""> American Ale"
Out "<option Value=""Scottish Ale""> Scottish Ale"
Out "<option Value=""Porter/Stout""> Porter/Stout"
Out "<option Value=""Bock""> Bock"
Out "<option Value=""Mørk lager""> Mørk Lager"
Out "<option Value=""Lager/Pilsner""> Lager/Pilsner"
Out "<option Value=""Vienna/Marzen/Oktoberfest""> Vienna/Marzen/Oktoberfest"
Out "<option Value=""Diverse""> Diverse"
Out "</td>"
Out "</select>"
%>
</table>
</form>
<%
End function

---

> Jeg har forsøgt nedenstående, men den er ligeglad med mit forsøg:
VALUE="""
> & rs("Stil") & """

Forvalg sker med 'selected' i den pågældende option:

<option Value=""Barley Wine"" selected="selected"> Barley Wine"

Du må derfor tjekke, hvor 'selected' skal sættes ind med en 'if'-sætning
eller lignende.

Kim

---

Enten:
Dim Out
Out = ""

Out = Out & "<tr><td>Ølstil<td><select Name=""Stil"" VALUE=""" & rs("Stil")
& """>"
Out = Out & "<option Value=""Barley Wine""> Barley Wine"


Eller:
%>
<tr><td>Ølstil<td><select Name="Stil" VALUE="<%rs("Stil")%>">
<option Value="Barley Wine"> Barley Wine
<%


Eller mener du at en av verdiene skal vises som selected:
Dim bSelected, sSelected

If et eller annet Then
bSelected = True
Else
bSelected = False
End If

If bSelected Then
sSelected = "selected "
Else
sSelected = ""
End If

%>
<tr><td>Ølstil<td><select Name="Stil" VALUE="<%rs("Stil")%>">
<option <%sSelected%>Value="Barley Wine"> Barley Wine
<%

Eller mener du noe helt annet?
terje