Loop i asp

Hej eksperter

Jeg har brug for lidt hjælp til at indsætte en korrekt loop.

Jeg har en mysql-data med en tabel, Sogebyer, som har rækkerne Id, By og Omraade.

Der er lidt over 500 id-nr., som en loop vil være meget praktisk :-)

Hvis jeg vil gøre det manuelt, ville koden være:

<%

Aakirkeby = Request.QueryString("Aakirkeby")
if Aakirkeby = "ON" Then
id = 1
end if

Allinge = Request.QueryString("Allinge")
if Allinge = "ON" Then
id = 2
end if

osv. frem til ca. 500

%>

Jeg har prøvet en loop ala (har husket forbindelse til databasen):

<%

SQL = "Select * from Sogebyer where Omraade = '' order by Id"

Set rs = Conn.Execute(SQL)

%>

<%
Do
%>

<%

rs("By") = Request.QueryString(" & rs("By") &")
if rs("By") = "ON" Then
id = rs("Id")
end if

%>

<%
  ' Gå til næste Record i rs
rs.MoveNext

' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF

' Luk databaseforbindelse
'Conn.Close
'Set Conn = Nothing
%>

Er der nogen, som kan rette til noget mere rigtigt?

På forhånd tak.