PB Compactage DB Access2000

Question

Besoin d'aide pour le compactage d'une DB Access2000, j'utilise les references à DAO 3.6. Une fois le prog compilé et exécuter sur le poste client (win95...), erreure 429: Le composant ActiveX ne peut créer l'objet.
Voici mon code:
'1. Compactage dans une nouvelle base
DBEngine.CompactDatabase App.Path & "\docs\adr.mdb", App.Path & "\docs\adrc.mdb"
'2. Suppression de la base originale
Kill App.Path & "\docs\adr.mdb"
'3. Renommer la base compactée avec le nom de la base originale
Name App.Path & "\docs\adrc.mdb" As App.Path & "\docs\adr.mdb"

Merci de votre aide, c'est très très urgent..

TTMan

cs_kmikaz · Answer

declare deja un objet compact
dim compact as new dbengine
puis fait ensuite 
DBEngine.CompactDatabase App.Path & "\docs\adr.mdb", App.Path & "\docs\adrc.mdb"
 et le reste ca devrait marcher.
C'est juste qu'il faut que tu crée une instance de l'objet avant de l'utiliser
salut :-) kmikaz

TTMan · Answer

Ok merci beaucoup.

cs_kmikaz · Answer

au fait comme tu as pu le remarquer ya une erreur
c'est  compact.CompactDatabase App.Path & "\docs\adr.mdb", App.Path & "\docs\adrc.mdb"
et non 
DBEngine.CompactDatabase App.Path & "\docs\adr.mdb", App.Path & "\docs\adrc.mdb"
parce que c'est compact qui est instancié. :-)

TTMan · Answer

Oui, j'avais corrigé... mais encore merci de ton aide... j'avais pas pensé que il fallait déclarer ça aussi (en plus des variables habituelles)....

Nightcourrier · Answer

Salut, 
         J'essais de faire ce que vous avez fais cependant il me dit tjrs comme erreur 

unrecoginez data Format 3343 ...

Merci de votre aide

Nightcourrier :)

PB Compactage DB Access2000

5 réponses

Discussions similaires