Jag har denna kod och sen när jag hämtar ifrån databasen så skriver den INTE ut selected på den som finns i databasen. Vad kan strula?!
RS("county") är tal i databasen
<%Set fso = CreateObject("Scripting.FileSystemObject")
set city = fso.OpenTextFile(Server.Mappath("inc/län.txt"), 1 )
arrFsoLines = Split(city.ReadAll, vbcrlf)%>
<select name="county" onChange="populate(document.reg.county.options[document.reg.county.selectedIndex].value,0);" style="width: 150px;">
<option value="0">------- Välj län -------</option>
<%For i = 0 To ubound(arrFsoLines)
arrText = Split(arrFsoLines(i),"|")%>
<option value="<%=ArrText(0)%>" <%If RS("county") = ArrText(0) Then%>Selected<%End If%>><%=ArrText(1)%>
<%Next %>
</select>
<%city.Close
Set city = Nothing
Set fso = Nothing%>
Länen sparas så här i textfilen!
9|Blekinge län
16|Dalarnas län
o.s.v