% Option Explicit Response.Expires = 0 %> <% Response.Expires = 0 DIM conexaodb Call AbreConexao DIM SQLArtigos, RSArtigos SQLArtigos = "SELECT * FROM Artigos " SQLArtigos = SQLArtigos & "WHERE Artigos.Ativo LIKE '1' " SQLArtigos = SQLArtigos & "ORDER BY Artigos.Data desc " Set RSArtigos = conexaodb.Execute(SQLArtigos) ' ****************************** %>
|
|
Página não encontrada
|
|
© 2000-2009 Remin WEB. Todos os direitos reservados |
| Melhor para uso de 1024 x 768 |