Jobbig grej...

Håller på att fixa en "Wizard" så folk kan skapa sina egna sidor efter en mall.
Jag har fixat allt med att skapa sidan och har nu kommit till administrationsdelen.
Jag har en rulllist(<select></select>) där jag har en "färgskala", nu vill jag att färgen besökaren tidigare valt ska få värdet "SELECTED" så att den syns överst i rulllisten.
Jag vet att man kan göra det med olika ifsatser men det blir ganska jobbigt, någon som vet något annat sätt?

minsida_admin.asp(Request.Form ska bytas ut till rs och lite till, inte klar med koden...)

<!-- #Include file="check.asp" -->
<%
Function fixa(str)
'lite kod...
End Function
%>
<center>
Bakgrundsfärg:
<select name="bgcolor">
<!-- #Include file="farger.inc" -->
</select>
<br><br>
<% If Request.Form("rubrik") <> "" Then %>
<center><font class="blacktext" size="12px"><%=Request.Form("rubrik")%></font>(Rubrikens färg: <select name="rubfarg"><!-- #Include file="farger.inc" --></select>&nbsp;&nbsp;&nbsp;Teckensnitt: <select name="rubfont"><option value="Verdana" style="font-family: Verdana;">Verdana</option><option value="Arial" style="font-family: Arial;">Arial</option><option value="Helvetica" style="font-family: Helvetica;">Helvetica</option><option value="MS Sans Seriff" style="font-family: MS Sans Seriff;">MS Sans Seriff</option></select>&nbsp;&nbsp;&nbsp;Storlek: <input type="text" name="rubstorlek" value="3" maxlegth="2" size="2">)</font></center>
<input type="hidden" name="rubrik" value="<%=Request.Form("rubrik")%>">
<% End If %>
<table align="center" cellpadding="2">
 <tr valign="top">
  <td width="300">
<% If NOT Request.Form("bildurl") = "http://" OR Request.Form("bildurl") = "" Then %>
<font class="blacktext">Bakgrundsfärg:</font> <select name="bildtdfarg"><!-- #Include file="farger.inc" --></select><br>
<img src="<%=Request.Form("bildurl")%>">
<input type="hidden" name="bildurl" value="<%=Request.Form("bildurl")%>">
<% End If %>
  </td>
   <td width="480">
<% If Request.Form("vtext") <> "" Then %>
<font class="blacktext">
Bakgrundsfärg: <select name="vtexttdfarg"><!-- #Include file="farger.inc" --></select>
&nbsp;&nbsp;&nbsp;
Textfärg: <select name="vtexttextfarg"><!-- #Include file="farger.inc" --></select><br><br>
<%=fixa(Request.Form("vtext"))%>
<input type="hidden" name="vtext" value="<%=Request.Form("vtext")%>">
</font>
<% End If %>
  </td>
 </tr>
 <tr valign="top">
  <td width="300">
<% If NOT Request.Form("adress1") = "http://" OR Request.Form("adress1") = "" AND Request.Form("adress2") = "http://" OR Request.Form("adress2") = "" AND Request.Form("adress3") = "http://" OR Request.Form("adress3") = "" AND Request.Form("adress4") = "http://" OR Request.Form("adress4") = "" AND Request.Form("adress5") = "http://" OR Request.Form("adress5") = "" Then %>
<font class="blacktext">
Bakgrundsfärg: <select name="lanktdfarg"><!-- #Include file="farger.inc" --></select>
<br>
Länkarnas/Länkens färg: <select name="lankfarg"><!-- #Include file="farger.inc" --></select>
<br>
Teckensnitt: <select name="lankfont"><option value="Verdana" style="font-family: Verdana;">Verdana</option><option value="Arial" style="font-family: Arial;">Arial</option><option value="Helvetica" style="font-family: Helvetica;">Helvetica</option><option value="MS Sans Seriff" style="font-family: MS Sans Seriff;">MS Sans Seriff</option></select>
</font>
<br><br>
<% 
End If

If NOT Request.Form("adress1") = "http://" OR Request.Form("adress1") = "" Then %>
<a href="<%=Request.Form("adress1")%>" target="_blank" class="blacklink"><%=Request.Form("lanktext1")%></a><br>
<input type="hidden" name="adress1" value="<%=Request.Form("adress1")%>">
<input type="hidden" name="lanktext1" value="<%=Request.Form("lanktext1")%>">
<% 
End If
If NOT Request.Form("adress2") = "http://" OR Request.Form("adress2") = "" Then %>
<a href="<%=Request.Form("adress2")%>" target="_blank" class="blacklink"><%=Request.Form("lanktext2")%></a><br>
<input type="hidden" name="adress2" value="<%=Request.Form("adress2")%>">
<input type="hidden" name="lanktext2" value="<%=Request.Form("lanktext2")%>">
<%
End If
If NOT Request.Form("adress3") = "http://" OR Request.Form("adress3") = "" Then %>
<a href="<%=Request.Form("adress3")%>" target="_blank" class="blacklink"><%=Request.Form("lanktext3")%></a><br>
<input type="hidden" name="adress3" value="<%=Request.Form("adress3")%>">
<input type="hidden" name="lanktext3" value="<%=Request.Form("lanktext3")%>">
<%
End If
If NOT Request.Form("adress4") = "http://" OR Request.Form("adress4") = "" Then %>
<a href="<%=Request.Form("adress4")%>" target="_blank" class="blacklink"><%=Request.Form("lanktext4")%></a><br>
<input type="hidden" name="adress4" value="<%=Request.Form("adress4")%>">
<input type="hidden" name="lanktext4" value="<%=Request.Form("lanktext4")%>">
<%
End If
If NOT Request.Form("adress5") = "http://" OR Request.Form("adress5") = "" Then %>
<a href="<%=Request.Form("adress5")%>" target="_blank" class="blacklink"><%=Request.Form("lanktext5")%></a><br>
<input type="hidden" name="adress5" value="<%=Request.Form("adress5")%>">
<input type="hidden" name="lanktext5" value="<%=Request.Form("lanktext5")%>">
<%
End If
%>

  </td>
  <td width="480">
<% If Request.Form("frittfalt") <> "" Then %>
<font class="blacktext">
Bakgrundsfärg: <select name="frittfalttdfarg"><!-- #Include file="farger.inc" --></select>
&nbsp&nbsp;&nbsp;
Textfärg: <select name="frittfalttextfarg"><!-- #Include file="farger.inc" --></select>
<br><br>
<%=fixa(Request.Form("frittfalt"))%>
</font>
<input type="hidden" name="frittfalt" value="<%=Request.Form("frittfalt")%>">
<% End If %>
  </td>
 </tr>
</table>

  </td>
 </tr>
</table>
<br><br>
<center>
<input type="hidden" name="mall" value="1">
<input type="submit" value="  Vidare  ">
&nbsp;&nbsp;&nbsp;
<input type="button" value="  Avbryt  " onClick="javascript:avbryt('steg2')">
</center>

farger.inc

<option value="#FFFFFF" style="background: #FFFFFF;" <%=sel%>>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</option>
[blue]Kunde inte ta med resten för det blev mer än 10000 tecken...[/blue]

<%=sel%> vill jag få till SELECTED.

Tacksam för svar!

/Mika3l