• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

RicardoC

Ajuda - Exibir De Acordo Com O Dia

13 mensagens neste tópico

Boas eu gostava que me ajudassem aqui, http://itscwrestling.com/today/ de acordo com este site, de acordo com o dia que é mostra o que aconteceu nesse dia. Gostava de saber como consigo fazer isso para o meu site, ou seja o código.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Primeiro que tudo o que tu queres fazer pode ser feito com Javascript, e se é estático vai ser um bocado "seca" a pores os conteúdos todos.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Mas posso aplicar através base de dados, eu estou a fazer o site em asp com base de dados em access...e como faço, podem facultar o código por favor

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Sendo assim podes usar AJAX, sempre é melhor (usas javascript na mesma, só que interages com o servidor).

Pesquisa por "ASP AJAX tutorial" no Google ou assim que ficas a saber mais sobre isso.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Mas estou a utilizar access não sei se vai dar ao mesmo....?!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Eu fui procurar e disseram-me para colocar isto:

<!--#include file="conexao.asp"-->
<%connect%>

<%

dia = day(now)
mes= month(now)

barra = "/"

Data = dia & barra & mes

SQL = "select * from Aconteceu where data = '"& Data &"' ORDER BY ANO ASC"

Set RS = conexao.Execute(SQL)
%>

antes do código html

				<%if not RS.eof then
				while not RS.eof%>
				<font size="2">					
				   <%=RS("Ano")%>   -   <%=RS("Acontecimento") & "<br>"%>
				</font>					                  
				<%
				RS.movenext
				wend
				end if
				RS.close
				%>
Isto é o que faz aparecer os dados

<%disconnect%> no final

Ou seja existe uma outra página de nome conexão.
<%
Set conexao = Server.CreateObject("ADODB.Connection")

Sub connect()
conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("WE.mdb")
End Sub

Sub disconnect()
conexao.Close
Set conexao = Nothing
End Sub
%>

A minha pergunta é...não será código a mais ? Quer dizer dá mas assim tenho de ter as duas páginas.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Por fim eu alterei a base de dados e foi o que ficou:

<%

dia = day(now)
mes= month(now)

barra = "/"

Data = dia & barra & mes

%>
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("WE.mdb"))
set rs = Server.CreateObject("ADODB.recordset")
sql="SELECT Distinct Ano, Acontecimento FROM Aconteceu where data = '"& Data &"'"
rs.Open sql, conn
%>
<%if not RS.eof then
while not RS.eof%>

<font size="2"> <%=RS("Ano")%>    <%=RS("Acontecimento")& "<br>" %></font>

<%
RS.movenext
wend
end if
RS.close
%>

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Não fui esclarecedor, eu gostava que se criasse uma situação de acordo com esta imagem e que fosse buscar os dados à base de dados, feita em access. De acordo com o mês, dia e ano que a pessoa procura

sasamb5.th.jpg

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Tens que usar ASP para isso, só javascript não vai lá. Gostava de te ajudar, mas não pesco pêvas de ASP (não preferes fazer isso em PHP? ;))

Um moderador devia mudar isto para o fórum correcto.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Então, se tens na base de dados o dia, mês e ano em que as "coisas" aconteceram, é só pegar no ano seleccionado pelo utilizador e usar a query

SELECT campos FROM tabela WHERE ano=ano_seleccionado AND mes=mes_seleccionado AND dia=dia_seleccionado;

para teres o All Years, All Months e All Days é so retirar a parte respectiva, por exemplo, se for All Years

SELECT campos FROM tabela WHERE mes=mes_seleccionado AND dia=dia_seleccionado;

a construção da query, claro, tem que ser feita em ASP, como estás a usar VB.NET não te posso ajudar pois não conheço a sintaxe.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora