CRYSTAL REPORT 8.5 E FIRIBIRD

USUARIO.EXCLUIDOS 07/06/2007 14:35:40
#220203
Galera para que vcs entenda a minha pergunta vou explicar como uso meu programa, minha aplicacao fiz para roda exclusivamente em rede por isso me aprofundei em estudar sobre arquivos ini e conseguir fazer com que o o meu arquivo ini informe onde a aplicacao dever buscar a base de dados. lembrando que uso o FiriBird... proseguindo... entao antes de adquirir o produto Crystal Report8.5 fiz alguns relatorios no datarReport e vir que ele e muito inferior ao Crystal Report e por isso comprei o mesmo... mais vamos ao que interessa... no dataReport fiz um relatorio de cidades onde nesse relatorio continha os seguintes campos
"codigo" e "nome" e depois no meu form fiz o procedimeno para abri o relatorio esse procedimento e exatamente assim:

Private Sub MnuAtividade_Click()
Dim TblCidades As ADODB.Recordset
Dim sql As String
    
    sql = "Select * From cidades"

Set TblCidades = conexao.Execute(sql)

If TblCidades .EOF = False Then
    Set RelatorioCidades.DataSource = TblCidades 
    RelatorioCidades.Show
Else
    MsgBox "Registro não localizado"
End If

End Sub


e dessa forma saiu perfeiro, mais isso no DataReport... agora a minha situacao...

No Crystal Report nao existe esse comando DataSouce, existe DataBase mais e agora como faço para abrir o meu relatorio da forma correta e como vou usar os filtros...Lembrando que minha base de dados o caminho e uma strin do meu arquivo ini isso claro se tiver aver...

agradeço desde ja;
USUARIO.EXCLUIDOS 08/06/2007 08:33:12
#220283
Alguem pode me ajudar?
USUARIO.EXCLUIDOS 08/06/2007 10:50:33
#220306
No site oficial do Crytal Reports tem um .PDF (link abaixo) com um monte de links para projetos exemplo em VB6 com CR 8, 8.5 e 9. Muito bom, recomendo.

http://support.businessobjects.com/communityCS/TechnicalPapers/apps_rdc.pdf.asp


Fiz um projeto de Cadastro de Clientes em VB6, CR8, ADO, BD Access
usando arquivos externos .RPT. Voce pode fazer um download no link abaixo...

http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=5853

No exemplo acima tem como passar os filtros para o RPT externo.
A questão do BD basta mudar no RPT a origem dos dados.
At,
USUARIO.EXCLUIDOS 08/06/2007 11:32:29
#220331
mais ess link de cima é todo em inglês
USUARIO.EXCLUIDOS 08/06/2007 11:35:41
#220334
é verdade, o VB também é todo em inglês. Não tem VB em português.
Se vc não tem pelo menos o inglês técnico para leitura ai fica difícil.
At,
USUARIO.EXCLUIDOS 08/06/2007 17:12:25
#220423
Sei disso cara mais o que to querendo e uma ajuda em portugues para crystal Report
ROBIU 08/06/2007 22:20:30
#220456 Resposta escolhida
Aqui vc vê como fazer no crystal 9. No 8 deve ser o mesmo
Este código está no load do form criado pelo cristal. 

 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
Tópico encerrado , respostas não são mais permitidas
Voltar