• 0
Sign in to follow this  
The Lau

Busca Pelo Crystal Selectionformula!

Question

Dae Galera!

O negocio é o seguinte!

Estou usando está formula para chamar um relatório no Crystal que acompanha o VB6!

Private Sub cmdImprimir_Click()

criterio = "(Cadastro.CaCodigo)= " & Text1.Text

Me.MousePointer = 11

CrystalReport1.ReportFileName = App.Path + "\Impressao.RPT"

CrystalReport1.DataFiles(0) = App.Path + "\Fitlau.mdb"

CrystalReport1.SelectionFormula = criterio

CrystalReport1.CopiesToPrinter = 1

CrystalReport1.Destination = crptToWindow

CrystalReport1.Action = 1

Me.MousePointer = 1

End Sub

A variável Text1.Text é a seguinte:

2 - 23/12/2005 - 17:40:05

Tenho BD com a seguinte arranjo:

Código Nome Data Peso ...

41 José 2 - 23/12/2005 - 17:40:05 87

Usando a fórmula acima ele dá erro na fórmula alguém saberia porque¿

Quando a variável é um numero comum...ele da certo mas a variável que eu preciso usar não da....

Agradeço a ajuda.

Share this post


Link to post
Share on other sites

5 answers to this question

Recommended Posts

  • 0

o certo não seria assim:

criterio = "{Cadastro.CaCodigo}= " & Text1.Text
com {} no lugar de ()? outra coisa é q não estou entendnedo o q você quer passar para o selection formula. porque desse jeito, a formula vai ficar assim:
{Cadastro.CaCodigo}= 2 - 23/12/2005 - 17:40:05
é isso esta totalmente errado. q tipo de campo é o ca codigo? string? data? numero? seja qual for, isso q você passou não existe. você poderia pelo menos tentar por entre aspas ou apostrofos. o q você quer fazer não é isso:
{Cadastro.CaCodigo}= 2

?

Share this post


Link to post
Share on other sites
  • 0
Guest - The Lau -

Na verdade eu gostaria de saber o que está errado... ?

So alterando o critério ficaria assim....

criterio = "{Cadastro.Data}= " & Text1.Text

ou

criterio = 2 - 23/12/2005 - 17:40:05

porque que a seguinte concatenação 2 - 23/12/2005 - 17:40:05

não é localizada no BD?

BD Cadastro

Código.............Nome.............Data ...........................................Peso

....41............... José .............2 - 23/12/2005 - 17:40:05 ...............87

F

Share this post


Link to post
Share on other sites
  • 0
Guest - The Lau -

Carakas... a principio parece que funcionou.... Mas me diz aí o que você fez brother?

Valeu mesmo.... biggrin.gif

Share this post


Link to post
Share on other sites
  • 0

so pus o Text1.Text entre apostrofo.

a sua formula ficou assim:

criterio = "{Cadastro.Data}= '2 - 23/12/2005 - 17:40:05'"
ficaria errado se ficasse assim:
criterio = "{Cadastro.Data}= 2 - 23/12/2005 - 17:40:05"

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Sign in to follow this