connection a une base access a distance
Bonjour tous,
j'ai besoin d'aide
j'essaye de me connecter a une base de donnée Access installé sur un autre PC ,car sur le mien n'est pas installé
dans mon code je met le Chemin complet pour acceder a cette base :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
Option Explicit
Dim rs As Recordset
Dim ws As Workspace
Dim db As Databas
Private Sub UserForm_Initialize()
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase("\\Poste11\test\BD.mdb")
Set rs = db.OpenRecordset("SELECT Projets.* FROM Projets;", dbOpenDynaset)
TextBox1.Text = rs![NomProjet]
end sub |
j'ai ce message d'erreur quand j'execute l'application
Code:
1
2
3
|
Erreur d'execution 429
un composant Activex ne peut pas créer d'objet |
et je ne comprend pas , est ce que vous avez une idée !
merci
