Select * From

Olá!

Bom, eu tenho duas tabelas no meu banco de dados

A "Parceiro" e "Planejamento"

Estou fazendo uma busca por todos os parceiros que sejam da Empresa X

**sql = "SELECT * FROM vw_parceiro where 1=1"**

if request("EmpresaNome") <> "" then

sql = sql & " and EmpresaNome like '" & request("EmpresaNome") & "%'"

sqlT = sqlT & " and EmpresaNome like '" & request("EmpresaNome") & "%'"

end if

set Aluno = GetRS(sql)

E após buscar esses alunos eu quero que me mostre em uma tabela os dados de planejamento deles.

**sql = "SELECT * FROM planejamento where id_parceiro ="&Aluno("id_parceiro")**

set Planejamento = GetRS(sql)

Porém quando eu peço para exibir em uma tabela, aparece apenas o planejamento de 1 aluno da minha primeira busca.

<% do while not Planejamento.EOF%>

**<tr>**

**<td class="cont1"> <%=Planejamento("id_planejamento")%> </td>**

**</tr>**

<%

Planejamento.MoveNext()

loop

%>

Imagino que seja porque não há um loop para mudar para o próximo parceiro; então como posso proceder?

Obrigado!