|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Crystal Reports)
|
|
 |
Título da Dica: Crystal com .ttx (passo-a-passo)
|
 |
|
|
|
Postada em 3/6/2003 por Gelson
exemplo efetuado na versão 8.5
Passo 1:
Anote todos os campos que voce vai usar no crystal
Passo 2:
Abra o crystal
Passo 3:
Peça um form vazio e no Data Explorer selecione:
DATABASE
MORE DATA SOURCES
ACTIVE DATA
ACTIVE DATA (FIELD DEFINITIONS ONLY)
em select DATA SOURCE
digite um nome de arquivo .ttx
após pressione 'new' e digite cada campo que voce vai precisar no crystal
Passo 4:
Desenhe o seu rpt
Passo 5:
no VB, monte um recordset, via sql, com os campos iguais e na sequencia que voce digitou no ttx
execute assim no vb
rs.CursorLocation = adUseClient
rs.Open seusql, conexao, adOpenForwardOnly, adLockReadOnly, adCmdText
Crystal.SetTablePrivateData 0, 3, rs
Crystal.ReportFileName = App.Path & "\seurpt"
crystal.WindowState = crptMaximized
crystal.ReportTitle = "mmmmmmmmmmmmm"
crystal.WindowTitle = "ww"
Crystal.Destination = crptToPrinter
Crystal.PrintReport
Resumindo, o seu crystal via independente de qualquer banco, o sql passa a ser construindo no vb da forma que voce quiser (filtros).
Não depende de ODBC ou coisa do genero.
|
|
|
|
|
