Veamos... Deja un momento que te ordene el código...
Código:
sqlseleccion="Select * from tjugadores where equipo='" & session("equipo") & "' and titular is not null order by titular ASC"
rs4.Open sqlseleccion, Conn
%>
<body>
<%
n=1
do while (n < 5) and not rs4.Eof
if cint(rs4("titular")) <> n then
sqluno="update tjugadores set titular = " & cint(n) & ", set reserva = null, lesionado = null where cambio='x' and equipo='" & session("equipo") & "'"
' rs4.Open sqluno --> No puedes usar un objeto abierto, crea otro ó
conn.execute sqluno
Exit Do
end if
rs4.movenext
n = n + 1
loop
rs4.close
set rs4 = nothing
Antes usabas un recordset ya abierto para actualizar un registro. O creas dos recordset (uno para el select y otro para el update) o bien un recordset para el select y un command para el update.
Un saludo