CRYSTAL REPORTS SEM DATASET

MAXCIM 18/08/2011 12:45:38
#381968
Olá amigos, estou ainda brigando com o crystal report e o vbnet.

depois de muito tentar rodar os reports feito em versão anterior ( Vs11) no Vbnet, carregando um data set.. sem sucesso.
peço encarecidamente...

tem como abrir o report sem usar um data set? semelhante ao que faziamos no VB6?

desde já agradeço
RXGOMES 18/08/2011 13:22:01
#381973
Veja este este link te ajuda
MAXCIM 18/08/2011 14:07:57
#381975
Olá, RxGomes, o link indicado, sugere alguns videos no msdn, no qual não os localizei. a exemplo citado uda o Dataset igual ao que ja testei. sem sucesso

continuo com o problema
MGALDINO 18/08/2011 14:09:57
#381976
Bom crio uma ODBC na maquina e vinculo ao relatório... do mesmo modo que fazia no Vb6.
MAXCIM 18/08/2011 14:36:54
#381982
Mgaldino,
pode me mostar como vc faz? as isntruçoes que usava no VB6 não estão disponiveis no VBnet.
MGALDINO 18/08/2011 15:02:14
#381984
Vamos Lá...

Primeiro voce vai criar sua ODBC lá na ferramentas administrativas... Nao sei se esta usando Mysql ou SQL Server...

No Vb.NET
Adiciona um novo item Crystal Report.
Dando dois click no relatorio criado ele pede as configurações!
No Gallery de OK.
Na Proxima Tela ele pede sua conexão.
Do lado direito tem uma treeview, Os passos a seguir são Create New Connection / ODBC, da dois click na sua ODBC...
Vai pedir usuario e senha, depois de informado, ele abre uma nova treeview com seu banco, seleciona as tabelas a ser usada e manda bala no Layout.

Para abrir o Relatorio Crie um novo form e coloque o Componente CrystalReportViewer.

Segue o Codigo para abrir o relatorio.


Dim Rr As New RptAgenciaConta

FrmRelatorio.CrystalReportViwer.ReportSource = Rr
FrmRelatorio.Show()



Não sei se consegui ser bastante claro mais qualquer coisa manda ai!
MAXCIM 18/08/2011 15:10:39
#381985
Obrigado pelo atenção.

uso Mysql. neste seu exemplo, vc apenas chamou o report.. mas como faço para pasar a query pra ele?
no Vb6 eu usava:
Citação:


RS.CursorLocation = adUseClient
RS.Open PCR.strSQL, Conexao, adOpenDynamic, adLockOptimistic
If Embranco = False Then
If RS.EOF Then
MsgBox [Ô]Não há itens para impressão![Ô], vbCritical, [Ô]Relatórios[Ô]
GoTo erro
End If
End If
[ô]-------
For Each TABELA In crxRpt.Database.Tables
Set Propriedades = TABELA.ConnectionProperties
Propriedades.DeleteAll
Propriedades.Add [Ô]Provider[Ô], Conexao.Provider
Propriedades.Add [Ô]DSN[Ô], myDSN.Name
Propriedades.Add [Ô]data source[Ô], RS.DataSource
Next
[ô]---------

crxRpt.DiscardSavedData
crxRpt.Database.SetDataSource RS
crxRpt.ReadRecords
Frm_CRPT.CRViewer11.ReportSource = crxRpt



agora no VBnet usei:
Citação:


Dim DAPVPA As MySqlDataAdapter = New MySqlDataAdapter(Sql, CONN)
DA.Fill(DS, [Ô]PV[Ô])
RPT.SetDataSource(DS)



porem não mostra os dados.... Hora não mostra.. hora não atualiza.... se tem mais de um SQL lá no console do crystal ele é despresado e seus dados não são exibidos.
MGALDINO 18/08/2011 16:11:22
#381996
Voce chegou a adicionar os campos no relatorio e deu um preview ele mostro os dados?

Mais é preciso quando voce vincular sua tabela aparecer os campos para adicionar no relatorio e dar um preview, para ver se esta tudo OK..

Para voce ver o relacionamento de suas tabelas na treeview do seu lado esquerdo tem databasefield... Click botão direito e database expert, na aba link mostra os relacionamentos.


RXGOMES 18/08/2011 16:53:20
#382008
Eu na net. que não é possível passar uma query direto para o CR, mas é possível passar valores para os parâmetros da query do report

segue o link

http://stackoverflow.com/questions/5063368/how-to-execute-an-sql-query-in-crystal-reports-2008
MAXCIM 18/08/2011 17:17:34
#382014
blz gente!
muito obrigado a todos!
Página 1 de 2 [14 registro(s)]
Tópico encerrado , respostas não são mais permitidas