Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Alex-jpa

Evento no Mês

Recommended Posts

Olá Galera

 

 

Preciso de uma ajuda.

 

Eu tenho um sistema de evento e preciso q ele verifique se existe evento no mês atual.

 

o código:

 

 

<%if request("estado") <> "" Then sql = " and estado = '"& request("estado") &"'"end ifif request("cidade") <> "" Then Sql = " and cidade = '"& request("cidade") &"'"end if  if request("data") <> "" Then	set rs = conexao.execute("Select * from agenda_eventos where data = '"& request("data") &"';")else  	set rs = conexao.execute("Select * from agenda_eventos where RIGHT(data,4) = '"&year(entdiax)&"' AND MID(data,4,2) = '"&mesdatax&"'"& sql &";")end if	if rs.eof then%>			<br>			</strong></font></span></strong></font></SPAN><SPAN style="font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px;" #invalid_attr_id="none"><span class="style5">Sem eventos neste mês			<%	Else   %>			</span></SPAN></th>		  </tr>		  <tr>			<th align="right" valign="top" scope="row"><TABLE width="180" 								border=1 align="left" 								cellPadding=2 cellSpacing=2 borderColor=#ffffff bgColor=CBE6F2>			  <TBODY>				<TR>				  <TD width=16><IMG height=88 								src="art_tit.gif" 								width=16></TD>				  <TD width="182" align="left" valign="top"><table width="190" border="0" cellspacing="1" cellpadding="0">					  <tr>						<th width="185" align="left" valign="top" bgcolor="#FFFFFF" scope="row"><font color="#3366CC"><strong><span class="txt">Eventos de <%=Ucase(Nome_mes)%> </span></strong></font></th>					  </tr>					  <tr>						<th height="20" align="left" valign="top" scope="row"><table width="200" height="50" border="0" cellpadding="0" cellspacing="0" class="tabela">							<tr bgcolor="#F2F2F2">							  <td width="30" align="center" bgcolor="#FFFFFF" class="txt">Dia</td>							  <td width="235" height="20" align="center" bgcolor="#FFFFFF" class="txt">Evento</td>							  <td width="135" align="center" bgcolor="#FFFFFF" class="txt">Cidade</td>							  <td width="48" align="center" bgcolor="#FFFFFF"class="txt">UF</td>							</tr>							<% x = 1  while not rs.eof %>							<%if x = 2 then x = 1%>							<tr bgcolor='#F8F8F8'>							  <%elsex = x + 1%>							<tr>							  <%end if%>							  <td align="center" bgcolor="#FFFFFF" class="txt"><%=LEFT(rs("data"),2)%></td>							  <td bgcolor="#FFFFFF" class="txt"><div align="center"><a href="evento.asp?id=<%=rs("id")%>" class="menu"><%=rs("titulo")%></a></div></td>							  <td align="center" bgcolor="#FFFFFF" class="txt"><%=rs("cidade")%></td>							  <td align="center" bgcolor="#FFFFFF" class="txt"><%=rs("estado")%></td>							</tr>							<%rs.movenextwend%>						</table></th>					  </tr>					  <tr>						<th align="left" valign="top" scope="row"><span class="txt"> </span></th>					  </tr>				  </table></TD>				</TR>			  </TBODY>			</TABLE>			<span class="txt-comum">			<%end ifrs.close%>
Bando de dados em Access

 

 

 

 

Grato

 

 

 

Alex

Compartilhar este post


Link para o post
Compartilhar em outros sites

O campo está com qual formato? Texto?

Compartilhar este post


Link para o post
Compartilhar em outros sites

O campo está com qual formato? Texto?

isso complica a toa...muda para data e apenas faça...WHERE MONTH(DATA) = " & MONTH(DATE) & " AND YEAR(DATA) = " & YEAR(DATE)

Compartilhar este post


Link para o post
Compartilhar em outros sites

então é simples tente fazer como eu falei

Compartilhar este post


Link para o post
Compartilhar em outros sites

então é simples tente fazer como eu falei

MárioMuito obrigado por sua ajuda....Você pode me dar uma melhor explicação, eu sou novato em ASP..... você pode colocar para mim naquele código que coloquei lá em cima..GratpAlex

Compartilhar este post


Link para o post
Compartilhar em outros sites

em vez de

 

set rs = conexao.execute("Select * from agenda_eventos where RIGHT(data,4) = '"&year(entdiax)&"' AND MID(data,4,2) = '"&mesdatax&"'"& sql &";")

use

 

set rs = conexao.execute("Select * from agenda_eventos where MONTH(data) = " & MONTH(date) & " AND YEAR(data) = " & YEAR(date) & "" & sql &";")

Compartilhar este post


Link para o post
Compartilhar em outros sites

em vez de

set rs = conexao.execute("Select * from agenda_eventos where RIGHT(data,4) = '"&year(entdiax)&"' AND MID(data,4,2) = '"&mesdatax&"'"& sql &";")
use
set rs = conexao.execute("Select * from agenda_eventos where MONTH(data) = " & MONTH(date) & " AND YEAR(data) = " & YEAR(date) & "" & sql &";")
MárioFicou 10000 .. funcionou direitinho......... se possivel ainda como faço para colocar em ordem das datas.... pq está fora de ordem....Muito grato pela sua ajuda..

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta assim:

set rs = conexao.execute("Select * from agenda_eventos where MONTH(data) = " & MONTH(date) & " AND YEAR(data) = " & YEAR(date) & "" & sql &" order by data desc;")

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta assim:

set rs = conexao.execute("Select * from agenda_eventos where MONTH(data) = " & MONTH(date) & " AND YEAR(data) = " & YEAR(date) & "" & sql &" order by data desc;")
Muito Obrigado Mário.. funcionou direitinhooAbraçosAlex

Compartilhar este post


Link para o post
Compartilhar em outros sites

MárioFicou 10000 .. funcionou direitinho......... se possivel ainda como faço para colocar em ordem das datas.... pq está fora de ordem....Muito grato pela sua ajuda..

de nada tiozinho :P

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.