Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Olá pesoal,
Estou precisando montar uma agenda, que mostre apenas os eventos do dia, comparando a data gravada com o do sistema.
Obtive ajuda de outros webmasters em outros foruns, mas não consegui montar o sistema, apresentando erro e/ou não aceitando os parâmetros.
Se alguém puder me ajudar, agradeceria muito, pois preciso montar esta sessão o mais rápido possível.
O código que estive batendo cabeça, segue abaixo:
<%'Faço a conexão com o bd e recupero os dadoscnpath="DBQ=" & Server.MapPath("db/agenda.mdb") DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open DataSourceset rs=conn.execute("select* From agenda where data = " & Date()&"")%><html><head><title>Agenda</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body bgcolor="#FFFFFF" text="#000000"><font face=verdana><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b><i> </i></b></font> <p align="center"> <%do until rs.eof%></p><table width="53%" border="0" cellspacing="0" cellpadding="0" align="center"> <tr> <td> <div align="left"></div> <div align="left"><font size="2"><%=rs("texto")%></font></div> </td> </tr> <tr> <td> <div align="center"></div> </td> </tr> <% rs.movenextloopconn.close%></table></font> </body></html>
A BD tem 3 Campos
1- ID
2- data
3- texto
Obrigado,
Douglas
Carregando comentários...