Problemer med SQL streng

<%
strSQL = "SELECT* FROM brugere ORDER BY Id ASC"
Set rs = Conn.Execute(strSQL)
%>

    <table width="<%= tableWidth %>" style="border-right: thin solid; border-top: thin solid; border-left: thin solid; border-bottom: thin solid">
        <tr>
            <td width="<%= tableWidth %>" bgcolor="<%= bgcolor %>">
                <b><font face="tahoma">Bødekasse til A218</font></b>
            </td>
        </tr>
    </table>

    <br />
   
    <table width="<%= tableWidth %>">
   
<%
Do
qSQL = "SELECT* FROM history WHERE brugerID = '" & rs("Id") & "'"
Set qRS = Conn.Execute(qSQL)

saldo = 0
   
Do While Not qRS.EOF
    if qRS("betalt") = 0 then
    elseif qRS("betalt") = 1 then
    elseif qRS("betalt") = 2 then
    end if
Loop
%>
        <tr>
            <td align="left" valign="top">
                <font face="arial"><a href="default.asp?page=history&id=<%= rs("Id") %>"><%= rs("brugernavn") %></a></font>
            </td>
            <td align="right" valign="top">
                <font face="arial"><%= saldo %> DKK</font>
            </td>
        </tr>
<%
rs.MoveNext
Loop While Not rs.EOF
%>
</table>

----

Problemet er når den anden SQL streng implementeres, altså qSQL-delen. Fjernes denne, er der ikke noget problem. Hvis denne implementeres, går siden i timeout - som om der er problemer med at have en Do while.. Loop inde i den eksisterende Do while.. Loop.

Nogle forslag?

Mange tak