Crystal Report Erro - VBWEB

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Voltar

Autor

Assunto: Crystal Report Erro

João Paulo

ARCOS
MG - BRASIL

ENUNCIADA !

Postada em 03/01/2011 20:38 hs

meu codigo é este

Private Sub Command1_Click()
    Cr1.ReportFileName = "C:Exemplos VB 6Gerar Relatorio CR 8.5     este.rpt"
    Cr1.Destination = crptToWindow
    Cr1.WindowState = crptMaximized

    If txtempresa.Text <> "RENATO" Then
        Cr1.SelectionFormula = "{tabEmpresas.Nome} ='" & txtempresa.Text & "'"           'campo escolhido é o campo de sua consulta para filtrar o relatorio
    End If
    'Cr1.RetrieveDataFiles
    Cr1.WindowTitle = "Relatorio por Empresa"
    Cr1.Action = 1

End Sub

da este erro: Run time erro 438: Object doesn't support this property or method
alguem sabe o q é isso?

Juan Carlos R.A

MACEIO
AL - BRASIL

ENUNCIADA !

Postada em 04/01/2011 10:22 hs

JOAO PAOLO SERIA BOM INDICAR A LINHA QUE DA ERRO:
TENTA AI:

Private Sub Command1_Click()
    CR1.RESET
    Cr1.ReportFileName = "C:\Exemplos VB 6Gerar Relatorio CR 8.5\Teste.rpt"
   CR1.DATAFILEDS(0)="CAMINHO DO BANCO"
    Cr1.Destination = crptToWindow
    CR1.DiscardSavedData = True
    Cr1.WindowState = crptMaximized
    If txtempresa.Text <> "RENATO" Then
        Cr1.SelectionFormula = "{tabEmpresas.Nome} ='" & txtempresa.Text & "'"
    End If
    Cr1.WindowTitle = "Relatorio por Empresa"
    Cr1.Action = 1
End Sub

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR


		CyberWEB Network Ltda. © Copyright 2000-2024 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site