'öppna databas etc
set rs = databas.execute("select id,rubrik from ogrish")
if not rs.eof then
response.write "<select name='news'>"
while not rs.eof
if clng(rs("id")) = clng(request.querystring("id")) then
s = "selected"
else
s = ""
end if
response.write "<option value='" & rs("id") & "'" & s & ">" & rs("rubrik") & "</option"
rs.movenext
wend
response.write "</select>"
end if
rs.close
------------------
essentitia preter non sans multiplicandum