Hej.
Jag har en sida där man kan ändra innehållet i en databas, sidan består av en massa forms(textbox) som är ifyllda med den befintliga informationen som hämtas från databasen.

Min fråga är kanske inte ASP men jag vet inte hur man gör, i en textbox hämtar man ju värdet genom att skriva:

< input name="ansi" type="text" value="<%=ansi%>" size="19" maxlength="19">

Här läggs ju "ansi" in i textboxen.

Hur gör man i en list box för att markera det som ligger databasen?

<code>
<select name="pris" size="4">
<option value="1">< 20000
<option value="2">20 - 30000
<option value="3">30 - 40000
<option value="4">40 - 50000
<option value="5">50 - 60000
<option value="6">> 60000
</select>
</code>

/christofer

Tabell:
-------
ID
TextValue


<code>
<select name="pris" size="4">

<%
do until rs.EOF

Response.Write "<option value=" & rs("ID") & ">" & rs("TextValue") & "</option>"
rs.movenext
loop
%>
</select>
</code>

(Skrivet på fri hand, kan finns nåt småerror, men jag tror du ser principen)

Hej!
Så här brukar jag göra

<SELECT NAME="GrNr">

<%DO UNTIL RS.EOF %>

<OPTION VALUE="<%= RS("GrpNr") %>"<% If RS("GrpNr") = Grupp Then %> SELECTED<% End If %>><%= RS("GrpNr") %>

<%
GROUP.MoveNext
Loop

ganska jobbigt om man har många val men det funkar

<code>
<%
if recset("valtval") = selealt1 Then
alternativ1 = "selected"

else if recset("valtval") = selealt2 Then
alternativ2 = "selected"

else if recset("valtval") = selealt3 Then
alternativ3 = "selected"

end if
%>

<select>
<option <%=alternativ1%>>alternativ1
<option <%=alternativ2%>>alternativ2
<option <%=alternativ3%>>alternativ3
</select>
</code>

Pice of cake. Jag har hittat en teknik som löser detta smidigt:
<code>
<select name="pris" size="4">
<%
Dim strValue
Dim strOptions
strValue = 5 'Exempel
strOptions = "<option value=""1"">&lt; 20000</option>" & vbCrLf & _
"<option value=""2"">20 - 30000</option>" & vbCrLf & _
"<option value=""3"">30 - 40000</option>" & vbCrLf & _
"<option value=""4"">40 - 50000</option>" & vbCrLf & _
"<option value=""5"">50 - 60000</option>" & vbCrLf & _
"<option value=""6"">&gt; 60000</option>" & vbCrLf
Response.Write Replace(strOptions, """" & strValue & """","""" & strValue & """ selected")
%>
</select>
</code>

Har någon synpunkter på det så tar jag gärna emot dem. ;o)