Ir para conteúdo

POWERED BY:

Arquivado

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

watequate

Tiraram meu topico

Recommended Posts

<%url_conexao = Server.MapPath("agenda.mdb") set conexao = Server.CreateObject("ADODB.Connection") conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexaostrSql = "select * from AGENDAS inner join EVENTOS on AGENDAS.codEvento = EVENTOS.codEvento"strSql = "where datadoevento = #" &date()& "#"set objRs = server.createObject("adodb.recordSet")objRs.open strSql, conexaoif(objRs.eof = false) thenresponse.write "<table>"do while objRs.eof = falseresponse.write "<tr>" response.write "<td>"response.write objRs("data")response.write "</td>"response.write "</tr>"response.write "<tr>" response.write "<td>"response.write objRs("nomeEvento")response.write "</td>"response.write "</tr>"response.write "<tr>" response.write "<td>"response.write "<BR>"response.write "</td>"response.write "</tr>"objRs.moveNextloopelseresponse.write "nenhum registro encontrado !!!"end if%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

tenque comentar, colokar uma aspas simples na frente 'q linha é a 15 ???

Compartilhar este post


Link para o post
Compartilhar em outros sites

o erro q estava dando era pq o nome do campo da tabela estava diferente. funcionou legal depois.

 

mas eh o seguinte, eu keria q só aparecesse os eventos do dia, agora esta aparecendo todos os eventos.

 

funcionando

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.