77) then%>font-size:14px;<%else%>font-size:16px;<%end if%>"> <%=noticias_rs("not_nome")%>

Piracicaba/SP - <%=noticias_rs("not_data")%>

<%if noticias_rs("not_imagem2") <> "" then %>

" alt="" style="float: right;margin: 0 13px 13px 0;width: 300px;" /> <%end if%> <%=noticias_rs("not_descricao")%>

+ NOTÍCIAS

<% SET md_rs = Server.CreateObject("ADODB.RecordSET") md_rs.ActiveConnection = ObjConexao md_rs.CursorType = 1 md_rs.CursorLocation = 3 md_rs.LockType = 3 md_rs.Source = "select * from tab_noticias " md_rs.Open %> <% Interval = 10 Ponteiro = request.queryString("Ponteiro") Ponteiro = CInt(Ponteiro) if Ponteiro = "" then Ponteiro = 1 end if if Ponteiro > 1 then for count=1 to Ponteiro if md_rs.EOF then Exit For else md_rs.movenext end if next end if %> <% for count2=1 to Interval if md_rs.EOF then exit for else %>

">[<%=md_rs("not_data")%>] - "><%=md_rs("not_nome")%>

<% md_rs.movenext end if next %>

<% if Ponteiro > 0 then response.write "Anterior" end if response.write "" if md_rs.RecordCount Mod Interval = 0 then for I=0 to (md_rs.RecordCount/Interval)-1 if Interval*I = Ponteiro then response.write "" & I+1 & "" else response.write ""& I+1 &"" end if next else for I=0 to (md_rs.RecordCount/Interval) if Interval*I = Ponteiro then Response.write "

"& I+1 &"

" else Response.write ""& I+1 &"" end if next end if response.write "" if Ponteiro+Interval < md_rs.Recordcount then response.write "Próxima" end if md_rs.close %>

<%=ws_publicidade%>

ENQUETE

<%=ws_enquete%>