百思不得其解的有关问题.

百思不得其解的问题...
说明:
_Trsoutio 表中的charID等于_Troots中的ID

此处掠过.................

     Set rs1= Server.CreateObject("ADODB.Recordset")
     SQL="Select top 50 * from _Trsoutio where Harcou>0  Order By Harcou Desc "
     rs1.open SQL,conn,1,1
charIDs = rs1("charID") '赋予变量charIDs为表_Trsoutio中的charID值.

dim j
j=1
do while not rs1.eof

     Set rs2= Server.CreateObject("ADODB.Recordset")
     SQL2="select GroatCount from _Troots   where  ID='"&charIDs&"' "

     rs2.open SQL2,conn,1,1
        <tr> 
          <td width="17%" align="center"><span class="style6"> <font color="#FFFFFF">

            </font> </span></td>
          <td width="46%" align="center"><span class="style6"> <font color="#FFFFFF">   
  
            第<%=j%>名

            </font> </span></td>
          <td width="19%" align="center"><span class="style6"> <font color="#FFFFFF">
                       <%=rs2("GroatCount")%>
            </font> </span></td>
          <td width="18%" align="center"><span class="style6"> <font color="#FFFFFF">

此处掠过.................

问题: 排行表中读取的 rs2("GroatCount") 一直是第一名的GroatCount值...请问大家如何解决?哪里的问题导致2-50名读取不了自己的的GroatCount值?
------解决思路----------------------
charIDs = rs1("charID") 要放在循环体里面


------解决思路----------------------
do while not rs1.eof
   charIDs = rs1("charID") '赋予变量charIDs为表_Trsoutio中的charID值.
   .....