Condição

[valmello 0]

Bom dia a todos.

Tenho postado algun tópico porém não tenho tido resposta.

Espero que nesta ocasião eu tenha mais sucesso.

 

====

 

Estou com um sistema onde quero que quando um campo checkbox estiver marcado como TRUE os registros apareçam e quando FALSE não.

Até aí tudo bem, pois está funcionando em parte.

O código é o que segue abaixo, só que do jeito que está ele só está conferindo o primeiro registro do banco.

Gostaria que alguém desse esta ajuda para ver o que eu esqueci de colocar para chegar todos os campos e me dar o resultado.

Fico no aguardo!

 

<%

if Trim((ListaTit.Fields.Item("pago").Value) = True) then

startrw = 0

endrw = HLooper1__index

numberColumns = 1

numrows = 10

while((numrows <> 0) AND (Not ListaTit.EOF))

startrw = endrw + 1

endrw = endrw + numberColumns

%>

<%

While ((startrw <= endrw) AND (Not ListaTit.EOF))

%>

<tr>

<td bgcolor="#FFFFFF"><%=(ListaTit.Fields.Item("cod_cliente").Value)%></td>

<td bgcolor="#FFFFFF"><%=(ListaTit.Fields.Item("fantasia").Value)%></td>

<td bgcolor="#FFFFFF"><%=(ListaTit.Fields.Item("dt_doc").Value)%></td>

<td bgcolor="#FFFFFF"><%=(ListaTit.Fields.Item("dt_venc").Value)%></td>

<td bgcolor="#FFFFFF"><%=(ListaTit.Fields.Item("num_doc").Value)%></td>

<td bgcolor="#FFFFFF"><%=(ListaTit.Fields.Item("nosso_num").Value)%></td>

<td bgcolor="#FFFFFF"><%= FormatCurrency((ListaTit.Fields.Item("valor").Value), 2, -2, -2, -2) %></td>

</tr>

<%

startrw = startrw + 1

ListaTit.MoveNext()

Wend

%>

 

<%

numrows=numrows-1

Wend

end if

%>

[jrcardozo 4]

bom, nesse código o checked deve ter evaporado. A logica para marcar seria

ASP

do while not rs.eof

%>

<intput type="checked" value="<%=rs("valor")%>" <%if cbool(rs(valor))=true then response.write("checked")%>>

<%

rs.movenext

loop