recordcount = -1 ???? com fonte

[slgnet 0]

Galera, seguinte, estou tentado fazer um while dentro de outro, ou seja uma busca em função de outra busca, mas ele não mostra nada, dei um recordcount, para ver se ele acha as informações e ele mostra -1, porque acontece isso?????<%strSQL = "SELECT * FROM perguntas WHERE cd_cliente='" & id_usuario & "' ORDER BY data ASC"Set rs = conn.Execute(strSQL)total = rs.recordcountdo while not rs.eof%></p><table width="100%" border="0" cellspacing="0" cellpadding="3"> <tr> <td bgcolor="#BED3E9"><font size="1" face="Arial, Helvetica, sans-serif"> <% response.Write(rs("titulo") & " - " & rs("data") & " | " & rs("hora")) %> <% response.Write(" | " & rs("id")) %> </font></td> </tr> <tr> <td> <font size="1" face="Arial, Helvetica, sans-serif"> <% response.Write(rs("texto")) %> </font></td> </tr></table><p align="justify"> <% strSQL1 = "SELECT * FROM respostas WHERE cd_cliente='" & id_usuario & "' AND cd_pergunta LIKE '" & rs("id") & "' ORDER BY data ASC" Set rsR = conn.Execute(strSQL1) x = rsR.recordcount if rsR.eof = true then do while not rsR.eof %></p><table width="90%" border="0" align="right" cellpadding="3" cellspacing="0"> <tr> <td bgcolor="#DFEAF4"> <font size="1" face="Arial, Helvetica, sans-serif"> <% response.Write(rsR("titulo") & " - " & rsR("data") & " | " & rsR("hora")) %> <% response.Write(" | " & rsR("id")) %> </font></td> </tr> <tr> <td> <font size="1" face="Arial, Helvetica, sans-serif"> <% response.Write(rsR("texto")) %> </font></td> </tr></table><p align="justify"> <% rsR.movenext loop rsR.close set rsR = nothing else response.Write("Não respondido") end if response.Write(x)rs.movenextlooprs.closeset rs = nothing%>

[Salgado 4]

você tem certeza que a condição está sendo atendida?

[gastao 0]

se você for fazer o while no mesmo rs, você tem que dar um rs.movefirst antes do segundo while

[rOcKLoCo 0]

Tente assim

Set rs = Server.CreateObject("ADODB.Recordset")rs.Open "SELECT.....", suaconexaoTotal = rs.RecordCountresponse.write Totalrs.Closeset rs = nothing

[m/ster 0]

Acho q eh a questao do ponteiro..Faz isso deepois de abrir o banco:Set rs = Server.CreateObject("ADODB.Recordset")rc.CursorType = 3rs.Open "SELECT.....", conexao_com_o_banco <_<