CORRIGINDO O TÓPICO "PEGAR DATA"

[enrrike 0]

OLÁ PESSOAL

 

FOI PASSADA UMA INFORMAÇÃO ERRADA PARA MIM:

 

EU TENHO QUE LISTAR AS DATAS "<=" QUE A DATA DIGITADA PELO USUÁRIO

 

EU FIZ ASSIM:

ASP

[*]strsql = strsql & " AND (I.DataVencimento) < " & FormataSQL(Trim(Request.QueryString("data")), "IN")

[*]

 

NÃO DEU ERRO MAS TAMBÉM NAO LISTOU NADA.

 

EU DEI UMA OLHADA NO BROWSER E REPAREI QUE A DATA ESTA SENDO PASSADA PARA A OUTRA PÁGINA COM ESTE FORMATO :

 

ASP

[*]ata = (Trim(Request.QueryString("data")))

[*]

[*].

[*].

[*].

[*]

[*]&Data=<%=ata%>&

[*]

[*].

[*].

[*].

[*]

[*]O VALOR DA DATA TÁ : &data=31%2F05%2F2005&

 

-------------------

 

*OBS: AOS ADMINISTRADORES DO FÓRUM: FAVOR DELETAR O TÓPICO "PEGAR DATA"

[Mário Monteiro 179]

O VALOR DA DATA TÁ : &data=31%2F05%2F2005&[/ASP]

 

-------------------

 

*OBS: AOS ADMINISTRADORES DO FÓRUM: FAVOR DELETAR O TÓPICO "PEGAR DATA"

você vai ter que converter pra data antes usando o cdate equando ao outro topico deixa já que você que iniciou quer vou apaga-lo

[enrrike 0]

mas como fica entao o comando completo com o CDATE ???

[enrrike 0]

mas meu <input> continua assim:<td> <input type="text" name="data" class="campo" size="10" maxlength="10" > dd/mm/aaaa </td>pois o usuario vai digitar : 24/05/2005

[enrrike 0]

eu coloquei assim:

 

ASP

[*] Dia = Left(Request.QueryString("Data"),2)

[*] Mes = Mid(Request.QueryString("Data"),4,2)

[*] Ano = Right(Request.QueryString("Data"),4)

[*]

[*] If (Trim(Request.QueryString("data")) <> "") Then

[*] ata = (Trim(Request.QueryString("data")))

[*] strsql = strsql & " AND I.DataVencimento <= " & "#" & Mes & "/" & Dia & "/" & Ano & "#" & "

[*] strsql = strsql & " AND ( I.Situacao = '1' )"

[*] End If

 

??????????

[enrrike 0]

testei e deu erro de sintaxe ='#'coloquei assim:If (Trim(Request.QueryString("data")) <> "") Then Dia = Left(Request.QueryString("data"),2) Mes = Mid(Request.QueryString("data"),4,2) Ano = Right(Request.QueryString("data"),4) ata = (Trim(Request.QueryString("data"))) strsql = strsql & " AND I.DataVencimento <= " & Mes & "/" & Dia & "/" & Ano & " " strsql = strsql & " AND ( I.Situacao = '1' )" End Ifnao deu erro , mas nao buscou nada

[enrrike 0]

ata é uma variaval eu passo o valor da data para ata, por que depois eu jogo tudo o resultado para uma pagina de impressaowww.imprime.asp?CodigoUsu=<%=usu%>&Data=<%=ata%>..........

[enrrike 0]

sei sei

 

mas veja isto :

 

 

o usuario digita uma data aqui:

<td>	  <input type="text" name="data" class="campo" size="10" maxlength="10" > dd/mm/aaaa	</td>

depois eu recebo o valor dessa data aqui:

If (Trim(Request.QueryString("data")) <> "") Then	  Dia = Left(Request.QueryString("data"),2)  Mes = Mid(Request.QueryString("data"),4,2)  Ano = Right(Request.QueryString("data"),4)	  ata = (Trim(Request.QueryString("data")))  strsql = strsql & " AND I.DataVencimento <=  " & "#" & Mes & "/" & Dia & "/" & Ano & "#" & " "  strsql = strsql & " AND ( I.Situacao = '1' )"		End If

mas ta aparecendo este erro:

Microsoft OLE DB Provider for SQL Server error '80040e14'Line 1: Incorrect syntax near '#'.

se eu tirar fora as # nao da erro , mas também nao busca nada

 

o que tem de errado nessa programação

 

e quanto aquele parada do CDATE ???

 

t+

[enrrike 0]

coloquei assim strsql = strsql & " AND I.DataVencimento <= " & "#" & Mes & "/" & Dia & "/" & Ano & "#" & "" e apareceu Microsoft OLE DB Provider for SQL Server error '80040e14'Line 1: Incorrect syntax near '#'.

[enrrike 0]

axo que nao tem nada de errado com minha query não alguma coisa de estranho ta acontecendo existe outro jeito de fazer isto ???existe um jeito mais facil e que realmente funciona ???t+

[enrrike 0]

po cara eu to agarrado nessa bosta o dia todoisso já era pra tar pronto me ajuda ahedeve existir outra maneira de fazer esta query help-met+

[enrrike 0]

mas heimde que adianta funcionar em outra página e não funcionar na minha.concordo com você de que alguma coisa deve estar errado na minha paginamas também a sua página dever ser diferente, deve receber e fazer a query de outra maneiramas heim nao desanima nao vamo continuar tentando deve ter outra forma de fazerme ajuda por favort+

[enrrike 0]

eu fiz assim:

 

ASP

[*]If (Trim(Request.QueryString("data")) <> "") Then

[*]

[*] Dia = Left(Request.QueryString("data"),2)

[*] Mes = Mid(Request.QueryString("data"),4,2)

[*] Ano = Right(Request.QueryString("data"),4)

[*]

[*] ata = (Trim(Request.QueryString("data")))

[*] vdata = Mes & "/" & Dia & "/" & Ano

[*] 'strsql = strsql & " AND I.DataVencimento <= "& CDATE(Request.QueryString("vdata")) &" "

[*] strsql = strsql & " AND I.DataVencimento <= " & "#" & vdata & "#"

[*] strsql = strsql & " AND ( I.Situacao = '1' )"

[*]

[*] End If

 

e continua dando esse erro:

 

Microsoft OLE DB Provider for SQL Server error '80040e14'Line 1: Incorrect syntax near '#'./adm/imovel/consulta2.asp, line 225

linha 225

ASP

[*] RS.open strsql,conexao

[Salgado 4]

Verifique se sua Função FormataSQL não está alterando a formatação na data.

[Mário Monteiro 179]

antes de abrir ou executar o recordsetescreve na tela a valor destrsql e mostra aqui...