|
|
Postada em 24/06/2004 10:29 hs
alguem poderia me dizer qual o erro nessa sintaxe erro 3075 Data2.RecordSource = "select * from titulos_receber where vencimento" & ">=#" & Format(CDate(txtdata.Text), "mm/dd/yyyy") & "#" & "and" & "<=#" & Format(CDate(txtfinal.Text), "mm/dd/yyyy") & "#" & "order by vencimento"
Data2.Refresh desde ja obrigado
 MaginBoo |
|
|
|
|
|
|
|
Postada em 24/06/2004 10:34 hs
Tente trocar as aspas duplas em "mm/dd/yyyy" por aspas simples 'mm/dd/yyyy'. T+ Rinaldo |
|
|
|
|
|
Postada em 24/06/2004 12:18 hs
rinaldo não deu certo não..mais mesmo assim obrigado..tem outro modo...
MaginBoo |
|
|
|
|
|
Postada em 24/06/2004 17:36 hs
Ai, tenta assim Data2.RecordSource = "select * from titulos_receber where vencimento >= #" & Format(CDate(txtdata.Text), "mm/dd/yyyy") & "# and vencimento <= #" & Format(CDate(txtfinal.Text), "mm/dd/yyyy") & "# order by vencimento"
Data2.Refresh T+ Rinaldo |
|
|
|
|
|
Postada em 24/06/2004 17:59 hs
Data2.RecordSource = "select * from titulos_receber where vencimento >= date(" & Format(CDate(txtdata.Text), "mm/dd/yyyy") & ") and vencimento <= date(" & Format(CDate(txtfinal.Text), "mm/dd/yyyy") & ") order by vencimento"
Data2.Refresh Se não der certo coloque o order By antes do where, asssim : Data2.RecordSource = "select * from titulos_receber order by vencimento where vencimento >= date(" & Format(CDate(txtdata.Text), "mm/dd/yyyy") & ") and vencimento <= date(" & Format(CDate(txtfinal.Text), "mm/dd/yyyy") & ")" Acho que é mais provável que a 2º opção funcione
 Eu sou o alfa e o ômega, o princípio e o fim, diz o Senhor, que é, e que era, e que há de vir, o Todo Poderoso. (Ap 1.8) 
|
|
|
|
|
|
Postada em 24/06/2004 18:45 hs
Se voe colocar assim: where vencimento BETWEEN # " & Format(DatIni, "mm/dd/yy") & "# And #" & Format(datfinal, "mm/dd/yy") & "#" _ order by vencimento. É lógico, trocar ali onde está datini e datfinal, pela sua variável Vila. |
|
|
|
