CRYSTAL 9 METODO RDC
Pessoal sou novo aqui no fórum gostaria da ajuda de vocês, estou tentando passar parâmetro via código com esse novo método mais não estou conseguindo,
alguem teria um exemplo da chamada de um relatório passando parâmetros, estou utilizando VB6, CRYSTAL 9 aguardo e obrigado.
alguem teria um exemplo da chamada de um relatório passando parâmetros, estou utilizando VB6, CRYSTAL 9 aguardo e obrigado.
Neste tópico tem isso
Eu não uso parâmetros no CR9. Faço o filtro no Select e já passo o valor filtrado para o report.
Veja neste exemplo. Se for informado a NF, exibe os dados da NF informada, se não for informado a NF exibe todas as NFs. Aqui a conexão já está aberta.
No load do form criado pelo CR9:
Eu não uso parâmetros no CR9. Faço o filtro no Select e já passo o valor filtrado para o report.
Veja neste exemplo. Se for informado a NF, exibe os dados da NF informada, se não for informado a NF exibe todas as NFs. Aqui a conexão já está aberta.
No load do form criado pelo CR9:
Private Sub Form_Load()
Set Rs = New ADODB.Recordset
Criterio = FrmMenu.Txt1.Text
If Criterio = [Ô][Ô] Then
Sql = [Ô]Select * from RptNf[Ô]
Else
Sql = [Ô]select * from rptnf where Nf=[ô][Ô] & Criterio & [Ô][ô][Ô]
End If
Rs.Open Sql, Bd, adOpenKeyset, adLockPessimistic
Report.Database.SetDataSource Rs
Screen.MousePointer = vbHourglass
CRViewer91.ReportSource = Report
CRViewer91.ViewReport
CRViewer91.Zoom 98
Screen.MousePointer = vbDefault
End Sub
pegando uma carona no tópico, eu instalei no meu micro o crystal 9.2, uso o 8.5 q não me dava opção de integrar dentro do vb6, agora o 9.2 da essa opção....porém todos meus rpts no 8.5 são externos ao vb, ou seja, feitos dentro do crystal...então o q devo fazer agora ?. sei q no 8.5 a distribuição nos clientes é pela ocx, no 9.2 isso muda né ?...os rpts ja feitos, deixo eles externos ou jogo dentro do vb ?..
Tópico encerrado , respostas não são mais permitidas