|
|
Postada em 29/06/2004 11:47 hs
Bom dia amigos, Gostaria que alguem me ajudasse no seguinte, tenho um determinado campo na tabela onde irei digitar a descricao do patrimonio, quero fazer com que o relatorio me exiba os dados referente ao criterio digitado numa text, exemplo: Descricao na tabela: ( mesa, com 4 cadeiras, 1 mt de altura, cor preta) formula no crystal: Dim Sit4 as string Sit4 = "" Sit4 = trim(Text1.text) onde (Text1 = preta) .SelectionFormula = "{CadBem.Desc} ='" & Sit4 & "'"
o que ocorre é que desse forma o codigo nao procura em toda a descricao, queria algo igual ao LIKE que busca em qualquer parte do campo. seria possivel isso??? se alguem puder me ajudar, agradeço... |
|
|
|
|
|
|-tom-|
|
CATANDUVA
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 29/06/2004 13:18 hs
Faça dessa maneira : .SelectionFormula = "{CadBem.Desc} Like' *" & Sit4 & " *' " tenta isso se nao der certo vc me avisa. OK
------------------------------------------------------------------------------------------------------------------------------------------------------------------------- tom -Catanduva/SP Analista Sistemas - Visual Basic 6 - VB.NET "Confiai perpetuamente no Senhor, porque o Senhor Deus é uma Rocha Eterna" Isaías 26:4 
|
|
|
|
CarlinhosBrown
não registrado
|
|
Postada em 29/06/2004 13:31 hs
na funcionou o relatorio saiu vazio... tem mais alguma ideia por ai????? |
|
|
|
|
|
Postada em 29/06/2004 13:41 hs
Testei aqui e deu certo sem os espaços:
SelectionFormula = "{CadBem.Desc} Like '*" & Sit4 & "*'"
Qual Versão do Crystal?
________________________ Té + Que NIMB role bons Dados! 
|
|
|
|
CarlinhosBrown
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 29/06/2004 13:51 hs
meu crystal é 8.0, vb 6.0, access 2000 |
|
|
|
|
|
Postada em 29/06/2004 13:57 hs
beleza, conseguimos, o relatorio funcionou, dessa forma: .SelectionFormula = "{CadBem.Desc} Like '*" & Sit4 & "*'"
valeu, muito obrigado.... |
|
|
|
