Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Boa tarde!
Estou com uma dificuldade em uma consulta de data, tenho uma base de dados Access onde salvo
Cod_prof - numero
ativo - texto Sim/Não
data_limite - data
Caso tenha um registro com data < = a data atual e que esteja ativo = 'Sim' e do professor
mostre a mensagem.
O código é:
<%
dia = day(date())
mes = month(date())
ano = year(date())
data = dia & "/" & mes & "/" & ano
data_limite = Right("0"&Day(Cdate(data)),2) & "/" & Right("0"&Month(Cdate(data)),2) & "/" & Right("0"&Year(Cdate(data)),4)
rectabela.open "select * from provas WHERE data_limite <= #"&data_limite&"# and ativo = 'Sim' and codprof="& codprof , conconecta
if not rectabela.eof or not rectabela.bof then
%>
<span class="style441"> O prazo para lançar as notas expirou, procure a coordenação! </span>
<% else %>Claudiney
Fabio Santos
Bom dia,
Valeu a dica, usei o format YYYY-MM-DD e deu certo.
Antes não retornava erro simplesmente não verificava a data.
Obrigado, valeu!!!
apenas complementando... vc pode formatar suas datas assim:
session.lcid=1046
function formatadata(data)
dia=day(data)
mes =month(data)
ano=year(data)
formatadata=dia&"/"&mes&"/"&ano
end function
SQL1 = "INSERT INTO NEWSLETTER (NewsletterNome,NewsletterEmail,NewsletterData,NewsletterHora,NewsletterIP,FL
G_EMAIL) VALUES ('"&Nome&"','"&Email&"',#"&formatadata(NewsletterData)&"#,'"&NewsletterHora&"','"&NewsletterIP&"','"&NewsletterFLG&"')"
Formato: aaaa-mm-dd
<%
Function ConverterDataBanco(ConDataBanco)
ConDataBanco = Year(ConDataBanco) &"-"& Right("0"&Month(ConDataBanco),2) &"-"& Right("0"&Day(ConDataBanco),2)
ConverterDataBanco = ConDataBanco
End Function
Response.Write(ConverterDataBanco(Date()))
%>
Formato: dd-mm-aaaa
<%
Function ConverterDataBanco(ConDataBanco)
ConDataBanco = Right("0"&Day(ConDataBanco),2) &"-"& Right("0"&Month(ConDataBanco),2) &"-"& Year(ConDataBanco)
ConverterDataBanco = ConDataBanco
End Function
Response.Write(ConverterDataBanco(Date()))
%>
Formato: mm-dd-aaaa
<%
Function ConverterDataBanco(ConDataBanco)
ConDataBanco = Right("0"&Month(ConDataBanco),2) &"-"& Right("0"&Day(ConDataBanco),2) &"-"& Year(ConDataBanco)
ConverterDataBanco = ConDataBanco
End Function
Response.Write(ConverterDataBanco(Date()))
%>
Formato: mm/dd/aaaa
<%
Function ConverterDataBanco(ConDataBanco)
ConDataBanco = Right("0"&Month(ConDataBanco),2) &"/"& Right("0"&Day(ConDataBanco),2) &"/"& Year(ConDataBanco)
ConverterDataBanco = ConDataBanco
End Function
Response.Write(ConverterDataBanco(Date()))
%>
qual o resultado que dá? Não vem nenhum registro?
da um response.write no sql gerado antes de executar o open e veja o que realmente você está enviando para o servidor.
Se o data_limite estiver gravando direito, tente verificar se não é melhor passar YYYY-mm-DD ao invés de dd-mm-yyyy.