Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Ricardo Goncakves

- DataBase

Recommended Posts

Galera eu estou tentando me ligar a uma base de dados feita em Acess e tenho o seguinte código.

 

'General'

Dim db As Database

'General'

 

Private Sub Form_Load()

 

Set WS = DBEngine.Workspaces(0)

DbFile = (App.Path & "lista.mdb")

PwdString = "swordfish"

Set db = DBEngine.OpenDatabase(DbFile, False, False, ";PWD=" & PwdString)

Set rs = db.OpenRecordset("Addresses", dbOpenTable)

 

End Sub

 

Ao compilar dá erro na Dim db As Database. O erro é o seguinte: User-Defined type not defined. Eu não sei porque está a acontecer isto, alguém sabe me ajudar? Obrigado pelo vosso apoio e pela vossa ajuda. Abraços! Até mais.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.