| |
<%
rsPagina.movefirst()
RepeatP__numRows = -1
RepeatP__index = 0
rsPagina_numRows = rsPagina_numRows + RepeatP__numRows
While ((RepeatP__numRows <> 0) AND (NOT rsPagina.EOF))
%>
<% if (rsPagina.Fields.Item("COL1PG").Value) = "B" then %>
<%=(rsPagina.Fields.Item("TXT1PG").Value)%>
<% end if %>
<%
RepeatP__index=RepeatP__index+1
RepeatP__numRows=RepeatP__numRows-1
rsPagina.MoveNext()
Wend
%>
|
|
|
 |
Centro
de Cartografia |
Sandbanks
Orangozinho
|
|
<%
rsPagina.movefirst()
RepeatP__numRows = -1
RepeatP__index = 0
rsPagina_numRows = rsPagina_numRows + RepeatP__numRows
While ((RepeatP__numRows <> 0) AND (NOT rsPagina.EOF))
%>
<% if (rsPagina.Fields.Item("COL1PG").Value) = "H" then %>
<%=(rsPagina.Fields.Item("TXT1PG").Value)%>
<% end if %>
<%
RepeatP__index=RepeatP__index+1
RepeatP__numRows=RepeatP__numRows-1
rsPagina.MoveNext()
Wend
%>
|
|