en cours d'exécution regsvr en utilisant VBA

Question

Existe-t-il un moyen que je peux exécuter regsvr32.exe pour enregistrer une DLL en utilisant VBA? Mon logiciel est en accès (ne me blâmez pas, blâmer l'entreprise).

L'accès pour une raison quelconque fait toujours référence à l'ancienne version de la bibliothèque DAO. Après environ 2 heures de recherche sur internet, quelqu'un a suggéré d'enregistrer la bibliothèque, et l'alto a fonctionné. Il réduit mon temps de 2 minutes (copie d'une cellule de jeu d'enregistrements par cellule) à environ 1 seconde.

donc 1) Comment puis-je appeler regsvr32.exe en utilisant VBA?

2) Cet utilitaire existe-t-il sous Vista et 7? La société utilise actuellement XP, mais les services techniques pilotent Win 7 et, espérons-le, la déploieront sur tous les ordinateurs d'ici la fin de l'année. Mon application ne peut pas arrêter de travailler!

Answer 1

Quelle version de DAO avez-vous actuellement comme référence dans votre fichier de base de données Access?

Si Access fait référence à une ancienne version de DAO, cela ressemble à une routine d'installation qui l'installe de manière incorrecte. Surtout si c'est DAO 3.6 comme cela fait partie du système d'exploitation Windows 2000 et plus récent. DAO 3.5 et 3.6 shuold ne se trouvent que dans C: \ Program Files \ Fichiers communs \ Microsoft Shared \ DAO. Si ailleurs, c'est faux.

Vous pouvez exécuter la commande shell pour enregistrer la DLL DAO.

shell("regsvr32 ""C:\Program Files\Common Files\Microsoft Shared\DAO\dao360.dll""") 

Si vous travaillez avec d'autres langues que l'anglais, vous devrez utiliser la routine CSIDL pour trouver la version spécifique de la langue des « Program Files ».

Je ne me souviens pas si regsvr32 nécessite des privilèges d'administrateur. C'est certainement possible.