duda en select haciendo do while

[Gaby_Corr]

Buen día Shiryu, muchas gracias por la explicación, has hecho que le entienda mucho mejor
al codigo,.. pero pues bueno con respecto a dudas.. ya la postee, aclaraciones y reclamaciones
pues la verdad no tengo ninguna =).

Solo sigo con la duda de por que no me funciona al igual que a ti =(
algo he de tener mal entonces ..

Código:

<!-- #include file="../conexion.asp"-->
<%
sub ingresardatos()
    l=0
    k=0
    dim privilegio()
    dim estado()

    For each elemento in request.form
        dato=request.Form(elemento)
        if instr(elemento,"idprivilegio")<>0 then          
            redim preserve privilegio(k)           
            privilegio(k)=dato		
			k=k+1
        elseif instr(elemento,"status")<>0 then           
            redim preserve estado(l)           
            estado(l)=dato 			
            l=l+1
        end if
    next

    for a=0 to ubound(privilegio)
        sql="UPDATE tabla SET status = '"&estado(a)&"' WHERE idprivilegio = "&privilegio(a)
        response.Write a & ".- "&SQL &"<br/>"
    next
end sub

if request.QueryString("vuelta")=1 then
    ingresardatos
end if
%>
<form method="POST" action="asignacionprivilegios.asp?vuelta=1" id="form1" name="form1" onSubmit="return verificar(this.id);">
<table>
<tr><td>
Grupos: <select name="grupo" id="grupo" onchange="Buscar(this.id)">
		<% call conectarDB
		strs = "Select * from DS_Grupos"
		Set rs1 = cnn.execute(strs)
		
		do while not rs1.eof
		%>
		<option value="<% = rs1("grupos_id")%>"><% = rs1("grupos_nombre")%></option>
		<% rs1.movenext
		   loop
		   rs1.close
		   Set rs1 = nothing
		   %>
		  </select>
</td>	
<td> 
	<div id="selusuarios">
		<select size="3" style=" width: 150px; margin-left: 30px;">
		<option>Usuarios del grupo</option></select>
	</div>
</td> </tr>	

<tr><td>Privilegio</td><td class="titprivilegio">Estatus</td></tr>
<% 
  sSQL = "Select * From DS_Privilegios Order by privilegio_id"
  set rs = cnn.execute(sSQL)
  do while not rs.eof
  i = i+1  
%>
<tr>
	<td><% = rs("privilegio_nombre")%><input name="idprivilegio<%=i%>" id="idprivilegio<%=i%>" type="hidden" value="<%=rs("privilegio_id")%>" /></td>
  	<td class="tdselrestnd">
	  <select name="status<%=i%>" id="status<%=i%>" class="selrestnd">
		  <option value="R">Restringida</option>
		  <option value="A">Autorizada</option>
	  </select></td>											
</tr>
<%  rs.movenext
	loop
	rs.close
	Set rs = nothing
	call desconectarDB%>				
	
<tr><td><input name="Guardar" type="image" value="submit" id="Guardar" src="images/GUARDAR1.gif"  /></td></tr>	
<input name="metodo" id="metodo" type="hidden"  /></table>
</form>