% '=============================================================== 'Define Paginacao '=============================================================== mypage=1 if request("whichpage")="" then mypage=1 else mypage=Cdbl(request("whichpage")) end if SQL = "SELECT * FROM artigos WHERE status=1" SQL = SQL & " ORDER by auto ;" RS.Open SQL,Conn,3,3 If rs.eof then response.write "
Locação de Filmes
Os valores de nossa locação:
<%
do while not rs.eof and howmanyrecs
="<%=cfgFont1%>"><%=Linker(RS("textoonline"))%> |
<% rs.MoveNext howmanyrecs=howmanyrecs+1 loop RS.Close Conn.Close %>
E-mail: st@corporal.com.br