DUVIDAS COM BANCO ACCESS 2003

RICKSOUSA 01/03/2010 18:39:11
#335718
quando eu clico no link para gerar o relatorio, aparece essa telinha pedindo uma senha,

isso começou acontecer pelo seguinte motivo.

antes eu tava usando a referencia DAO 2.5/3.5 e o banco era o visdata do vb6 ai eu perguntei para um amigo como eu faria para usar o banco de dados access 2003 mesmo.

ele me indicou a referencia DAO 3.6 object library, ai eu converti o antigo banco para o oficcer 2003, esta funcionando perfeitamente, só que quando eu vou gerar o relatorio ele pede uma senha....

em general eu declaro assim o banco

public banco as database

e no form load eu chamo assim....

Set banco = OpenDatabase(App.Path & [Ô]\banco.mdb[Ô])
Set tabela = banco.OpenRecordset([Ô]select * from Venda[Ô], dbOpenDynaset)
Set tabela2 = banco.OpenRecordset([Ô]select * from ItensVenda[Ô], dbOpenDynaset)

sera que ta faltando algo???

olha eu quero terminar esse projeto em DAO mesmo depois eu vou começar com ADO.

estou dizendo isso para evitar por enquanto que alguem diga para eu mudar para o ADO....
TECLA 01/03/2010 20:13:20
#335724
Você acrescentou uma senha no arquivo MDB?
RICKSOUSA 03/03/2010 03:47:32
#335869
não, eu não coloquei senha não tecla....
PEGUDO 03/03/2010 07:26:56
#335871
E se você tentasse usar a [Ô]Microsoft ActiveX Data Objects 2.8 Library[Ô]?

Não custa nada tentar.
Abraços
SINKERTEC 03/03/2010 10:46:58
#335899
Resposta escolhida


PEGUDO.. isso aí é ADO e ele ta usando DAO...n vai funcionar

RICK.. é o seguinte...qdo vc abriu seu banco de dados, vc deve ter aberto em modo exclusivo...crie um novo, e importe todas as tabelas e consultar do seu banco original...pode resolver

outra coisa...troque
Set tabela = banco.OpenRecordset([Ô]select * from Venda[Ô], dbOpenDynaset)
Set tabela2 = banco.OpenRecordset([Ô]select * from ItensVenda[Ô], dbOpenDynaset)
por
Set tabela = banco.OpenRecordset([Ô]Venda[Ô])
Set tabela2 = banco.OpenRecordset([Ô]ItensVenda[Ô])

boa sorte
Tópico encerrado , respostas não são mais permitidas