|
|
Postada em 24/10/2005 15:04 hs
Estou fazendo uma consulta por data no crystalreports 4.6 da sequinte maneira: Dim SQL As String
SQL = "{apartamentos.bairro} = '" & txtbairro1(0).Text & "' or"
SQL = SQL & "{apartamentos.bairro} = '" & txtbairro2(1).Text & " ' or"
SQL = SQL & "{apartamentos.bairro} = '" & txtbairro3(2).Text & " ' or"
SQL = SQL & "({apartamentos.data}) = Date(" & Mid(mskdataini(0), 7, 4) & "," & Mid(mskdataini(0), 4, 2) & "," & Mid(mskdataini(0), 1, 2) & ") and ({apartamentos.data}) = date(" & Mid(mskdatafinal(1), 7, 4) & "," & Mid(mskdatafinal(1), 4, 2) & Mid(mskdatafinal(1), 1, 2) & ")" CrystalReport1.PrintFileName = App.Path & "elapart1.rpt"
CrystalReport1.ReportFileName = App.Path & "elapart1.rpt"
CrystalReport1.SelectionFormula = SQL
CrystalReport1.Destination = 0
CrystalReport1.Action = 1 só que está dando erro, o que pode ser? Marcelo |
|
|
|
|
|
|
|
Postada em 24/10/2005 15:13 hs
vc estah passando a data como: yyyy,mm,dd?
dah uns espaços pra ficar melhor de enchergar e manda o valor q fica dentro da variavel SQL pra dar pra visualizar melhor o q vc quer
"Quando estou fraco, aí então é que sou Poderoso"
|
|
|
|
|
|
Postada em 24/10/2005 15:22 hs
Vaca, eu coloquei esse formato (yyyy/mm/dd) em propriedades do maskedbox Marcelo |
|
|
|
|
|
Postada em 24/10/2005 15:27 hs
na hr de passar tem q ser com virgulas... tenta assim: yyyy, mm, dd
"Quando estou fraco, aí então é que sou Poderoso"
|
|
|
|
|
|
Postada em 24/10/2005 15:44 hs
É exatamente este o problema... O código de datas do Crystal é {tabela.campodata}=date(yyyy,mm,dd}
Gustavo Boese
|
|
|
|
|
|
Postada em 25/10/2005 05:55 hs
TENTE ISSO : {tabela.campodata}=FORMAT(date,"mm-dd-yyyy") espero te ajudado |
|
|
|
|
