RELATORIO ACCESS COM SENHA

DREAMSOFT 05/12/2006 08:53:51
#188002
Olá gente, andei pesquisando aqui no site, mas não encontrei um exemplo que funcionasse em meu caso!
Preciso abrir um relatório access que tem senha, pois no momento ele pede em uma caixa a senha!

Estou usando o código abaixo para impressão:

  
Dim ac As Access.Application
Set ac = New Access.Application
ac.OpenCurrentDatabase "c:\CD\bd.mdb", False
ac.DoCmd.OpenReport "TabVisitantes"
ac.CloseCurrentDatabase


Desde já fico agradecido!
DREAMSOFT 08/12/2006 07:50:49
#188743
Ninguém? [S22]
ONBASS 08/12/2006 08:21:31
#188746
veja assim..

Dim ac As Access.Application

Private Sub Command1_Click()

Set ac = New Access.Application
ac.Visible = True
ac.OpenCurrentDatabase "D:\BACKUP_NEW\Meus documentos\bd1-2.mdb", False
ac.DoCmd.OpenReport "sem conta", acViewPreview, , , acDialog
End Sub


----------------------------------------------------------------
Private Sub Form_Unload(Cancel As Integer)

Set ac = Nothing

End Sub
DREAMSOFT 08/12/2006 08:58:12
#188751
DEKINHO e a senha, aonde entra?
ONBASS 08/12/2006 09:37:04
#188763
cara, se não estou enganado, o relatório em si não tem senha, ele deve tá pedindo a senha do bd...
DREAMSOFT 08/12/2006 09:44:34
#188768
bom meu relatório está dentro do Access! E ao abri-lo ele pede senha, eu coloco-a e ele saí corretamente!

Agora preciso abri-lo sem pedir senha pro usuário, preciso fixa-la ao código fonte.
ONBASS 08/12/2006 09:54:47
#188774
tenta alterar essa linha..

ac.OpenCurrentDatabase "c:\CD\bd.mdb", False ,"sua senha"
DREAMSOFT 08/12/2006 10:02:31
#188777
Não funcionou =(
DREAMSOFT 08/12/2006 12:35:15
#188822
Achei uma solução paralela! Agora gero relatório pelo DataReport.
Tópico encerrado , respostas não são mais permitidas
Voltar