Opdatere alle felter på en gang ...

Håber en kan hjælpe.

Jeg har en database hvor der ligger nogle informationer i et felt. Hvordan kan jeg få den til at opdatere alle mine felter på en gang. En slags update af dem alle for at se om jeg har lavet en rettelser i nogen af dem.

Koden her skriver alle for uge 1 ud. Hvis jeg eksempelvis retter information 1 og 10 så skal den tjekke dem alle igennem for rettelser sådan den ikke glemmer nogen.

Håber en forstår hvad jeg mener.

--------------
strSQL = \"SELECT * FROM billeder where (uge=\"1\")\"
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\\home\\domain\\db\\users.mdb\"
Set rs = myConn.Execute(strSQL)
%>   
<% If not (rs.BOF Or rs.EOF) Then %>
<% do while not rs.eof %>
<INPUT TYPE=\"hidden\" NAME=\"ID\" VALUE=\"<%=rs(\"id\")%>\">
<textarea class=\"text\" rows=\"8\" name=\"beskrivelse\" cols=\"30\"><%=rs(\"beskrivelse\")%></textarea>
<%
rs.movenext
loop

myconn.close
set myconn = nothing
Set rs = Nothing
end if %>
--------------------