Loop form opdateringsfelt

Hejsa NG.

Lille problem.

Jeg har et True/False felt i en tabel. Hvis nu jeg har 100 emner hvor feltet er sat til TRUE og gerne vil fjerne dem alle på én gang, ved at fjerne fluebenet og så kun skulle trykke én gang på 'Update'.

Hvordan får jeg følgende kode til dette, som pt kun reagerer ud fra et ID-kald:

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("Provider") 

Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM Trailer WHERE id LIKE '" & Request.QueryString("id") & "'"
rs.open sql, conn, 1, 3
   
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
       
rs.update

rs("tvactive") = Request("tvactive")

rs.update
Response.Redirect("news.asp?mode=news_online")
end if
%>

<form method="post" action="news.asp?mode=news_correct&id=<%=rs("id")%>">
Aktiv:<br />
<input class="forms" size="20" type="checkbox" name="kanal" value='<%=rs("tvactive")%>'>&nbsp;&nbsp;<strong><%=rs("Titel")%></strong>
<input class="formsknap" size="20" type="submit" value="Opdater" id=submit1 name=submit1></form>
</form>

<%
rs.close
set rs = nothing
end if
%>

Selve SQL-sætningen skal kalde dem ud med:

sql = "SELECT * FROM Trailer WHERE tvactive = True