Problemas Com While

[Saulo_Jitsu]

Fala pessoal!

Eu to com um problema que parece ser facil de se resolver..

Eu estou usando o dreamweaver e ele não deixa que eu aninhe dois while's (no dreamweaver é acionado pela opção Repeat Region), então, eu "enganei" ele inserindo o while no direto no código. Só que fica dando diversos erros que eu não consigo resolver. Como eu não sou programador asp, eu só copiei o código do while que ele deixa eu introduzir, e colei para poder criar o segundo while aninhado ao primeiro (eu tive que substitui umas variaveis).

Segue abaixo o código para que alguém possa me ajudar:

While ((Repeat1__numRows <> 0) AND (NOT Perguntas.EOF))

%>

<tr>

<td><a name="<%=(Categoria.Fields.Item("IDCateg").Value)%>"></a><span class="Titulotexto"> <%=(Categoria.Fields.Item("Categoria").Value)%> </span></td>

</tr>

<% While ((Repeat2__numRows <> 0) AND (NOT Perguntas.EOF))

%>

<tr>

<td> <a href="#<%=(Perguntas.Fields.Item("ID").Value)%>%>"><%=(Perguntas.Fields.Item("Pegunta").Value)%></a> </td>

</tr>

<%

Repeat2__index=Repeat2__index+1

Repeat2__numRows=Repeat2__numRows-1

Perguntas.MoveNext()

Wend

%>

<%

Repeat1__index=Repeat1__index+1

Repeat1__numRows=Repeat1__numRows-1

Perguntas.MoveNext()

Wend

%>

e no inicio do código tem isso também:

<%

Dim Repeat1__numRows

Dim Repeat1__index

Repeat1__numRows = 10

Repeat1__index = 0

Perguntas_numRows = Perguntas_numRows + Repeat1__numRows

%>

<%

Dim Repeat2__numRows

Dim Repeat2__index

Repeat2__numRows = -1

Repeat2__index = 0

Perguntas_numRows = Perguntas_numRows + Repeat2__numRows

%>

Desde já agradeço a todos.

Abraço

[Norivan Oliveira]

Por que você quer criar duas regioes repetitivas? use só uma.

seja qual for o motivo você não pode criar uma regiao repetitiva dentro da outra, tenta assim:

<%While ((Repeat1__numRows <> 0) AND (NOT Perguntas.EOF))
%>
<tr>
<td><a name="<%=(Categoria.Fields.Item("IDCateg").Value)%>"></a><span class="Titulotexto"> <%=(Categoria.Fields.Item("Categoria").Value)%> </span></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Perguntas.MoveNext()
Wend
%>

<% While ((Repeat2__numRows <> 0) AND (NOT Perguntas.EOF))
%>
<tr>
<td> <a href="#<%=(Perguntas.Fields.Item("ID").Value)%>%>"><%=(Perguntas.Fields.Item("Pegunta").Value)%></a> </td>
</tr>
<%
Repeat2__index=Repeat2__index+1
Repeat2__numRows=Repeat2__numRows-1
Perguntas.MoveNext()
Wend
%>