Discussion :

[Danger]

Bonjour,
Mon application affiche a son démarrage le message:
"Le composant ActiveX ne peut créer l'objet"
Voici le code ou le blocage survient:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
'Ouverture de la base de données
  Set db = New Connection
  db.CursorLocation = adUseClient
  db.Open CONN_STR
  NBR_FORM = 0
  TYPE_D = REEL

L'application bloque au niveau de la commande "db.open CONN_STR"
CONN_STR est une constante dont la valeur est: "PROVIDER=MSDataShape;dsn=Cost.S;uid=;pwd=;"

Sur le net j'ai trouvé qu'il suffisait d'enregistrer DAO350.dll pour que ça fonctionne, pourtant ça ne fonctionne pas.

D'autres idées ?

[zazaraignée]

Sur le net j'ai trouvé qu'il suffisait d'enregistrer DAO350.dll pour que ça fonctionne, pourtant ça ne fonctionne pas.

Que veux-tu dire au juste ? Tu as bien ajouté le composant en référence dans ton projet ?

En passant, si tu ajoutais les balieses Code, ce serait chouette. Tu n'as qu'à éditer ton message en cliquant sur le bouton Editer. Dans l'éditeur, tu sélectionne ton code et tu cliques sur .

[Delbeke]

De toute façon, la syntaxe

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set db = New Connection
db.CursorLocation = adUseClient
db.Open CONN_STR

dit que ce n'est pas DAO que tu utilises, donc çà ne sert à rien d'ajouter une référence à DAO
Voit plutot du coté de ADO, ou alors change ton code pour l' adapter à DAO

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim Db as DataBase
Set Db = OpenDataBase(NomBase)
etc ...

[Danger]

Le problème est que l'application fonctionnait (elle le fait depuis 3 ans déjà) et il est inadmissible pour mes clients de commencer à changer les connexions et tout.

D'ailleurs le même exécutable qui me sort ce problème fonctionne sur d'autres postes, seul deux postes affichent des problèmes et les deux sont munis d'une installation Client Access AS/400, peut être qu'il y a un problème d'incompatibilité ?

Dois-je clôturer ce sujet ?