Jag försöker fixa så att en viss post i min databas hämtas upp och visas i en listruta med rullgardin. där ska man göra sitt val, men finns det inget lämligt val så ska man välja: " Ange eget val" och då ska man få upp en textruta där det inskrivna resultatet ska både skickas vidare till andra sidor och ner till databas för uppdatering
Jag har gjort så här ungefär:
Men vet ej hur jag ska gå vidare med funktionaliteten för att ange nytt val. Tacksam för svar
<code>
Do While Not RecSet.EOF
Response.Write "<OPTION VALUE= ' " & RecSet("Matningsnummer") &" '>"
Response.Write RecSet("Miljo")
RecSet.MoveNext
Loop
%>
<OPTION VALUE="Ange ny miljö">
<%


If OPTION VALUE = "Ange ny miljö" Then
Här ska kod skrivas för den nya textrutan
Else
Response.Write "Valde:" & OPTION VALUE & "som ny miljö"
End If

</code>

Detta kanske är till nån hjälp:
<code>
<FORM method=POST>
<SELECT name=Matningsnummer>
<OPTION VALUE="Ange ny miljö">
<%
Do Until RecSet.EOF
If RecSet("Matningsnummer") = Request.Form("Matningsnummer") Then
Response.Write "<OPTION selected value='" & RecSet("Matningsnummer") &"'>" & RecSet("Miljo") & "</OPTION>"
RecSet.MoveNext
Exit For
Else
Response.Write "<OPTION value='" & RecSet("Matningsnummer") &"'>" & RecSet("Miljo") & "</OPTION>"
End If
RecSet.MoveNext
Loop
Do Until RecSet.EOF
Response.Write "<OPTION value='" & RecSet("Matningsnummer") &"'>" & RecSet("Miljo") & "</OPTION>"
RecSet.MoveNext
Loop

If Request.Form("Matningsnummer") = "Ange ny miljö" Then
'Här ska kod skrivas för den nya textrutan
Else
Response.Write "Valde:" & Request.Form("Matningsnummer") & "som ny miljö"
End If


%>
</SELECT>
<INPUT type=submit>
</FORM>

</code>