Marcel
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 11/06/2007 10:48 hs
|
|
|
|
|
|
|
|
Postada em 12/06/2007 11:11 hs
Bom dia Marcel, desculpe a demora, pois estava atendendo alguns clientes. Acabei de enviar para o seu e-mail uma espécie de Tutorial passo a passo como conseguir o seu objetivo. Após obter sucesso, coloque no Fórum. Qualquer novidade em VB compartilhe também. por: Carlos Henrique Regeneração - Piauí - Brasil |
|
|
|
DCM
|
GOIÂNIA
GO - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 12/06/2007 15:04 hs
Ai, passa pra mim tambem Carlos_Henrique.....
t+
"Se fizeres o bem, não é certo que serás aceito? E se não fizeres o bem, o pecado jaz à porta, e sobre ti será o seu desejo; mas sobre ele tu deves dominar - Gênesis 4.7" 
|
|
|
|
Carlos Henrique
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 13/06/2007 13:16 hs
Olá Dário, até o final do dia eu lhe envio. Caso tenha também novidades em VB mande pra mim também. Não passo neste momento porque tenho que sair urgente! |
|
|
|
M
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 13/06/2007 13:59 hs
Como estava comentándo com a Carlos Henrique, resolvi o problema usando o Crystal Reports mesmo. CrystalReposts1.ReportFileName = App.Path & "Seurelatório.rpt"
CrystalReposts1.Destination = crptToWindow
CrystalReposts1.WindowState = crptMaximized
If Text1.Text <> "Todos" Then
CrystalReposts1.SelectionFormula = "{Tabela.Campo} ='" & Text1 & "'"
End If
CrystalReposts1.RetrieveDataFiles
CrystalReposts1.WindowTitle = "Relatório de Débitos"
CrystalReposts1.Action = 1 |
|
|
|
|
|
Postada em 15/06/2007 13:22 hs
Ao Marcelo de Campos: Não desista, veja o exemplo passo a passo que passei pra teu e-mail. Ao dariobonjovi acabei de lhe enviar um e-mail idêntico ao Marcelo de Campos. |
|
|
|
