ED - CLARETT
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 29/03/2006 13:53 hs
Como faço para pegar uma variavel no VB e colocar ela num campo que não seja do banco no relatirio do crystal??? muito obrigado por qualquer ajuda |
|
|
|
|
|
Eduardo Lima
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 01/04/2006 12:15 hs
No Crystal crie uma formula: nome = Teste1 = "" No VB Dim var1 as string .Formulas(1) = "Teste1= '" & var1 & "'"
|
|
|
|
ED- Clarett
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 03/04/2006 07:40 hs
Não funcionou.... Fiz isso... No crystal criei uma formula em branco no vb.. Dim var1 As String
var1 = "12345"
CRViewer1.formulas(1) = "text1= "" & var1 & """
CRViewer1.ReportSource = crRpt
CRViewer1.ViewReport
Da erro de propriedade não suportada. Onde errei??? Muito obrigado pela ajuda...abraços... |
|
|
|
Leolima
|
PORTO ALEGRE
RS - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 03/04/2006 09:24 hs
Eu faco assim: ' passando paramatro para crystal Dim Report As New nomedorelatorio Report.ParameterFields.GetItemByName("codigo").ClearCurrentValueAndRange 'limpa o valor anterior
Report.ParameterFields.GetItemByName("codigo").AddCurrentValue InputBox("teste") ' este valor estou passando por uma inputbox, mas poderia ser estatico
rpt.ReportSource = Report
rpt.ViewReport '---------------- No cristal vc cria um novo parameter field... Colocando este parameter field no relatorio, ele trara o valor da variavel que vc informou no vb. Estou usando o crystal XI, mas isto funciona pelo menos apartir do 9
"A mente que se abre para novas idéias jamais volta ao seu tamanho original".
(Albert Einstein) ----------------------------------------------PII-450-256MB-GForceII-64-TV/out-Soyo----- ----Agora com Framework 1.1 + Visual Studio 2003 + WinXP. Acredite se quiser!----
Leonardo Cassuriaga Fone:(51) 96394735
Tecnico Informática __o Programador VB6.0
Programador Web _>/, DBA Access
-------------------------------------------(+)/(+)__________P_o_r_t_o__A_l_e_g_r_e_RS__
Charles Darwin : As espécies que sobrevivem não são as mais fortes, mas as que melhor conseguem se adaptar às mudanças!
-----------------------------------------------------------------------------------------------
|
|
TÓPICO EDITADO
|
|
|
|
ED - Clarett
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 03/04/2006 11:35 hs
tentei o que me passou, fiz assim... crRpt.ParameterFields.GetItemByName("codigo").ClearCurrentValueAndRange 'limpa o valor anterior
crRpt.ParameterFields.GetItemByName("codigo").AddCurrentValue InputBox("teste") ' este valor estou passando por uma inputbox, mas poderia ser estatico
CRViewer1.ReportSource = crRpt
CRViewer1.ViewReport Mas da erro de "Nome Inválido" logo na primeira linha. No crystal XI criei um Parameter field com o nome de "codigo" , Lista de valores: estático e campo de valor "nenhum" Onde estou errando??? Muito obrigado pela atenção e ajuda. |
|
|
|
