Comparação de datas

[fabiosc80 0]

Preciso fazer um negócio aqu imas nao sei como

 

Tenho que pegar uma data que ta no banco de dados e comparar com a data de hoje

 

Se for menor da uma mensagem se for maior da outra mensagem. Porem não to conseguindo:

 

Olhem como fiz.

 

if TB1("ias_start_day")&"/"&TB1("ias_start_month")&"/"&TB1("ias_start_year")&" "&TB1("ias_start_hour")&":"&TB1("ias_start_minute")&":00" > date thenresponse.write "É maior"response.endelseif TB1("ias_start_day")&"/"&TB1("ias_start_month")&"/"&TB1("ias_start_year")&" "&TB1("ias_start_hour")&":"&TB1("ias_start_minute")&":00" < date thenresponse.write "É menor"response.endend if

Porque nao da certo a mensagem certa??

[sr.silva 1]

Amigo pelo que vi você tem tres campos de datas...

e necessario isso???

 

Pois se não for, armazene a data em apenas um campo e faça uma comparação normal.

 

if rs("date") <> date() then  response.writeelse  response.write

[fabiosc80 0]

preciso do dia, mes ,ano, hora e minuto.Ai que ta matando

[sr.silva 1]

Ok!!Você precisa do DIA MES ANO, certo??Porque não armazena em um unico campo, e na sua programação fosse recupera esses valores, ficando fácil para efetuar a comparação depois.entendeu??

[fabiosc80 0]

Sim, mas e a hora e os minutos????

[sr.silva 1]

E so formatar com o FormatDateTime()

 

Devolve uma expressão formatada como Data ou Tempo ( hora )Dim DataData=now ( )SacarData = FormatDateTime(Data, 1) ' e desta maneira recebe-se a data'o valor usado é para definir o formato com que se recebe a dataCódigos de Formato :0 -> formato short date, se tiver só a hora sai só a hora, se tiver só a data sai só a data, se tiver ambos saiem ambos como short format1 -> long date2 -> short date format especificado no Regional Settings do computador3 -> Dispara a hora especificado no Regional Settings do computador4 -> Devolve a hora usando o formato 24horas (hh:mm)

[fabiosc80 0]

acho que a formatação "1" da pau cara, pois vem em texto

[sr.silva 1]

Primeiro, consegui entender o problema??

 

Se sim, vamos analisar para achar a solução

 

observer isso

 

0 -> formato short date, se tiver só a hora sai só a hora, se tiver só a data sai só a data, se tiver ambos saiem ambos como short format1 -> long date2 -> short date format especificado no Regional Settings do computador3 -> Dispara a hora especificado no Regional Settings do computador4 -> Devolve a hora usando o formato 24horas (hh:mm)

[fabiosc80 0]

Consegui cara

 

olha só

 

datai= formatdatetime(TB1("ias_start_day")&"/"&TB1("ias_start_month")&"/"&TB1("ias_start_year")&" "&TB1("ias_start_hour")&":"&TB1("ias_start_minute")&":00",0)if datai < formatdatetime(now,0) thenresponse.write "É maior"'response.endelseif datai > formatdatetime(now,0) thenresponse.write "É menor"'response.endend if

 

Valeu cara,

 

Só que ai só tem duas situações vou colocar pra 3 depois, pra menor, maior e entre menor e maior.

 

Mas valeu mesmo cara.

 

Não tava entendendo oque tava acontecendo.

[sr.silva 1]

Estamos ae http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

[]´s

[fabiosc80 0]

Bruno só pra finalizar.

 

Ve se ta certa a lógica:

 

datai= formatdatetime(TB1("ias_start_day")&"/"&TB1("ias_start_month")&"/"&TB1("ias_start_year")&" "&TB1("ias_start_hour")&":"&TB1("ias_start_minute")&":00",0)if formatdatetime(now,0) < datai thenmsg = "Pendente"elseif formatdatetime(now,0) > formatdatetime(DataTerminoLeilao,0) thenmsg = "Finalizado"elsemsg = ""end if

A data de termino do leilao é uma função que calcula o dia e hora que termina o leilao.

[sr.silva 1]

E necessário essa variavel datai???

[fabiosc80 0]

Nescessario não é, coloquei pra nao ter que deixar o código de baixo grande.

 

Mas aproveitando o tópico.

 

Tenho uma outra parte no site que me calcula a Data do Término do Leilão.

 

Mas tem uma página que em alguns casos da esse erro aqui:

 

 

Microsoft VBScript runtime error '800a000d' Type mismatch: '[string: ""]' /ribas2/produtos_vendedor.asp, line 350

 

alinha 350 é essa aqui:

 

multiplicacao2 = TB2("das_end_hour") * 60

 

sabe pq da esse erro só pela mensagem?

[sr.silva 1]

TB2("das_end_hour")

O que você armazena nesse campo?

[fabiosc80 0]

Baixei o banco de dados cara e vi o "PROBLEMA"um registro nao gravou valor ali....Sorry...Cara esse site ta me deixando louco, um #@?$%~ site enorme pra acabar até dia 31.