CALENDARIO !! Nao consigo alguem pode me r ?

[Nadlo Clesio 0]

Galera seguinte , esse é um codigo do meu site na parte de agenda , no momento ele esta aparecendo apenas os eventos DAQUELA SEMANA a qual estamos .. queria mudar o codigo para que quando o usuário entrasse já aparecesse a agenda toda do ano todo , nao so da semana como está aparecendo atualmente !Alguem pode me dar uma luz ?Abaixo segue o codigo:<%Vdia = Request.QueryString("dia")Vmes = Request.QueryString("mes")IF (Vdia <> "") AND (Vmes <> "") Then inicio = Vmes&"/"&Vdia&"/"&ano 'inicio = Vdia&"/"&Vmes&"/"&ano fim = Vmes&"/"&Vdia&"/"&ano 'fim = Vdia&"/"&Vmes&"/"&anoELSE inicio = month(date)&"/"&day(date)&"/"&year(date) 'inicio = date fim = DateAdd("ww", 1, date) fim = month(fim)&"/"&day(fim)&"/"&year(fim) 'fim = day(fim)&"/"&month(fim)&"/"&year(fim)END IF'inicio = "09/06/2005"'fim = "09/13/2005" sql="SELECT FF.id_festa, FF.NMfesta, FF.data, FF.Ingresso, FF.local, FF.VFcobertura, FF.id_casa, FF.VFagenda, FC.NMcasa FROM FFesta FF "&_ " LEFT JOIN FCasas FC ON (FC.id_casa = FF.id_casa) "&_ " WHERE FF.id_cidade = "&session("cidade")&" AND FF.VFagenda = 1 AND FF.data between '"&inicio&"' AND '"&fim&"' "&_ " ORDER BY FF.data, FF.id_festa DESC " rs.open sql, conn, 3,3IF not rs.eof then while not rs.eof VRIDfesta = rs("id_festa") if diatual <> day(rs("data")) then%> <tr> <td height="31" background="Layout/F3tpdia.jpg" id="itemCOB" valign="top" style="padding: 2px 0px 0px 26px;"><li class="topicoCOB2"><b>(<%=day(rs("data"))%>/<%=month(rs("data"))%>) - <%=Ucase(DateName(weekday(rs("data")),2))%></b></li></td> </tr><% diatual = day(rs("data")) end if%> <!------------ {TEMPLATE:FESTA:BEGIN} ---------------------> <tr> <td id="itemCOB" onMouseOver="this.background='Layout/F2backcob.jpg';" onMouseOut="this.background='';" onClick="java script:festa(<%=VRIDfesta%>);"> <div style="padding-left:26px"> <li class="topicoCOB2"><b><%=rs("NMfesta")%></b></li> <br> <font class="campoCOB"> <B>Data:</B> <%=rs("data")%> <br> <b>Local:</b> <% IF rs("id_casa") <> 0 Then %><%=rs("NMcasa")%><% Else %><%=rs("local")%><% End IF %> <br> <b>Ingresso:</b> <%=rs("Ingresso")%> <br> <% IF rs("VFcobertura") = 1 OR rs("id_casa") <> 0 THEN if rs("VFcobertura") = 1 then%> <img src="Layout/icon_cobertura.gif" align="absmiddle"> <b>Vai rolar cobertura.</b> <% end if if rs("id_casa") <> 0 then %> <img src="Layout/icon_casa.gif" width="16" height="16" align="absmiddle"> <b>Conheça a casa de show.</b> <% end if %> <br> <% END IF %> </font> </div> <img src="Layout/linha2.jpg"> </td> </tr><% rs.movenext wend ELSE %> <tr> <td> <% Alerta("<b>AGENDA:</b> Nenhum evento programado para está data: <b>"&DateConvert(inicio)&"</b>") %> </td> </tr> <% END IF rs.close%> Obrigado gente ...

[Nadlo Clesio 0]

Opa funciono legal, agora tipo eu me expressei de forma errada , eu gostaria que aparecesse os eventos apartir da data atual ... o que mudaria no select ? Pq no caso está aparecendo os antigos , e os usuários nao precisam ver o que já passou , so os eventos futuros , quer dizer apartir do dia atual.Mas muito obrigado por te me ajudado fico mt grato !

[Nadlo Clesio 0]

Alguem me ajuda please!!

[Robex 171 0]

data=date() 'vai sempre pegar a data a tual

 

" WHERE FF.id_cidade = "&session("cidade")&" AND FF.VFagenda = 1 AND FF.data = data ORDER BY FF.data, FF.id_festa DESC "

 

Coloca no seu Where que quer registros a partir da data atual, que foi atribuida a variavel data!

 

 

Foi mai esqueci as reticencias... da data

 

" WHERE FF.id_cidade = "&session("cidade")&" AND FF.VFagenda = 1 AND FF.data = 'data' ORDER BY FF.data, FF.id_festa DESC "

[Nadlo Clesio 0]

Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][ODBC SQL Server Driver]

Syntax error converting datetime from character string. /FMagenda.asp, line 70 deu esse erro de conversao!!

[Nadlo Clesio 0]

Alguem pode me ajudar por favorrr ???

[Carlos_Seiji 0]

WHERE FF.id_cidade = "&session("cidade")&" AND FF.VFagenda = 1 AND FF.data = '"&data&"' ORDER BY FF.data, FF.id_festa DESC