USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Abrir relatório do CR10 , usando BD com senha
-Mauricio-
PONTAL DO PARANÁ
PR - BRASIL
ENUNCIADA !
Postada em 12/08/2008 09:09 hs            
Pessoal, bom dia
 
Estou usando VB6 , CR10 e Access 2003.
Preciso abrir um relatório no VB acessando um banco de dados ACCESS com senha.
Abaixo segue o código que estou usando, está funcionando perfeitamente, só que com a senha não abre e eu só preciso incluir a opção da senha.
    
    Set n_relatorio = n_aplicacao.OpenReport(arquivo)
    Set n_banco = n_relatorio.Database
    Set n_tabelas = n_banco.Tables
    For x = 1 To n_tabelas.Count
        Set n_tabela = n_tabelas.Item(x)
    Next
    n_tabela.Location = App.Path & "anco.mdb"
    n_relatorio.DiscardSavedData
    CR1.ReportSource = n_relatorio
   
 
   
Tiranossauro
DOIS IRMÃOS
RS - BRASIL
ENUNCIADA !
Postada em 12/08/2008 17:58 hs            

  Set n_relatorio = n_aplicacao.OpenReport(arquivo)
    Set n_banco = n_relatorio.Database
    Set n_tabelas = n_banco.Tables
    For x = 1 To n_tabelas.Count
        Set n_tabela = n_tabelas.Item(x)
    Next
    n_tabela.Location = App.Path & "anco.mdb"
    n_relatorio.DiscardSavedData

No Crystal 8 faço assim:

    n_relatorio.Connect = "pwd=senha"
   

CR1.ReportSource = n_relatorio
   

   
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
Topo da página