Discussion :

[Marc_27]

Bonjour à tous,

j'ai un application dévéloppe sous Access et sécurisé para mot de passe (Outils/sécurité/définir le mot de passe de la base de données).

Coment faire pour lancer un batch windows et executer une macro que j'appelé Macro1?

Je sais que sans mot de passe il fault utiliser:
"C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE" "E:\Data\Impression\DRH_BASE.mdb" /x Macro1, mais ça ne marche pas si la base a été protegée.

Est-ce que quelqu'un peut m'aider, svp?
Merci d'avance

[argyronet]

Bonjour,

Avec un SendKeys, tu devrais pour alimenter la zone de mot de passe et simuler l'appuie sur OK (13).

Il faudra peut-être envisager de faire usage des API SetForeGroundWindow() et un SetFocus() de la fenêtre pour être certain que ton batch ne plante pas.

Argy

[Marc_27]

Je vraiment vous remercie argyronet
mais vous avez parlé du vrai chinois pour moi...

J'ai quelque chose du VBA, mais je connais rien des API Windows.
J'étais en train d'imaginer qu'il serait un peu plus simple (comme _/pwd_)...

Est-ce que vous pouvez donner un peu plus des details???
(pas trop, par exemple, où ecrire le code? Sur Access où sur le batch (qu'est un bloc notes)?)

Merci encore une fois

[argyronet]

Oui, c'est possible...

Plus simple évidement, c'est écrit dans ce tutoriel...

Argy

[Marc_27]

J'avais déjà vu ce tuto...

Mais il dit que n'est pas possible de le faire avec _/pwd_, c'est pour ça que j'ai écrit ici.

L'option /PWD ne concerne que le mot de passe définit pour la sécurité par groupe de travail (fichier mdw). En aucun elle n'est applicable au mot de passe définit sur le fichier lui-même par le menu Outils/sécurité/définir le mot de passe de la base de données.

J'ai trouvé aussi quelque chose pour la compactage de la base, mais je n'ai pas su comment l'adapter au cas de la macro...

Je me chauffe donc pour essayer votre solution avec des API's...
Si ce n'est pas trop du travail pour vous, comment je pourrais alors commencer?

[argyronet]

Humm, je me suis emballé, je pensais au final que tu avais un MDW avc ton appli.
Donc, je reviens sur ma 1ère proposition mais c'est effectivement pas simple à mettre en oeuvre si l'on ne connais (comprend serait plus juste) pas VBA.
Je veux bien te proposer un code exemple...

Argy

[LedZeppII]

Bonjour,

Si tu n'a pas besoin d'interactions avec l'utilisateur, tu peux essayer d'utiliser un script VBS et piloter Access par automation.

Code MonScript.vbs :

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

1
2
3
4
5
6
7
8
9
Dim accApp
Dim strBdd
 
strBdd = "E:\Data\Impression\DRH_BASE.mdb"
Set accApp = CreateObject("Access.Application")
accApp.OpenCurrentDatabase strBdd, False, "123456"
accApp.DoCmd.RunMacro "Macro1"
accApp.QUIT
Set accApp = Nothing

Ligne de commande pour lancer le script (pour créer une tâche planifiée par exemple) :

Code :

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

"%WINDIR%\SYSTEM32\WScript.exe" "Chemin\MonScript.vbs"

ou

Code :

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

"%WINDIR%\SYSTEM32\CScript.exe" "Chemin\MonScript.vbs"

Sinon un double-clic sur le fichier MonScript.vbs depuis l'explorateur Windows.

A+

[Marc_27]

Merci beaucoup à vous, Argy et LedII

Le code a bien marché!

J'ai essayé les deux options pour appeler le script, mais le premier, avec WScript donne un erreur sur la ligne 7 du script.

Le deuxième option (CScript) marche bien.

[LedZeppII]

Bonjour,

S'il y a une erreur avec WScript, c'est pas bon.
Il faudrait la corriger.
Avec CScript, il se peut que tu n'ai pas le temps de voir l'erreur, ou qu'elle ne puisse pas s'afficher.

A+

[Marc_27]

Je vais voir demain,

mais je pense que tout a bien se passé, la macro a été exécutée.
D'après que j'ai dit, je vérifie demain et je poste...

Merci encore une fois

[vodiem]

salut argyronet, LedZeppII , Marc_27,

une autre idée serait de lire la ligne de commande à l'ouverture.

[Marc_27]

Salut vodiem, bienvenue à la discussion.
Je ne peux pas faire à l'ouverture car il fault faire l'actualisation de la base pendant la nuit...

En retournant au sujet des scripts, quel est la difference entre WScript et CScript?

Le WScript donne toujours un erreur à la ligne 7 (avec la macro), mais pas le CScript, que apparemment marche bien et fait l'update da la base.

[argyronet]

En retournant au sujet des scripts, quel est la difference entre WScript et CScript?

• C comme Console (Texte)
• W comme Windows (Graphique)

Selon moi, il serait bon de transposer ce code en VBA pour essayer d'intercepter l'erreur si tu n'as pas Microsoft Visual InterDev sinon tu peux lancer en mode pas à pas pour voir.
Pour ce type de test, fait en sorte que ta Macro ne fasse rien d'autre que d'afficher un message, donc en appeler une spécifique.

Argy

[vodiem]

Je ne peux pas faire à l'ouverture car il fault faire l'actualisation de la base pendant la nuit...

je ne me suis donc mal exprimé...

je voyais une exécution de l'application conditionné par ligne de commande.
lorsque l'application se lance il analyse les paramètres de la ligne de commande (par exemple: vérifier s'il y a un mot de passe, s'il s'agit d'exécuter l'actualisation...)
cela dit en faisant par: "Outils/sécurité/définir le mot de passe..." je crains qu'aucun code ne s'exécute avant la saisie de mot de passe. il faudrait donc faire la gestion de la saisie du mot de passe.

[Marc_27]

En fait le script de LedZepII a bien marché, au moins avec le CScript
Aujoud'hui je n'ai pas eu du temps pour chercher l'erreur du WScript...

Je vais essayer de le mettre dans le code VBA pour chercher l'erreur, mais je ferais ça lundi.

Pour le moment,
je vous remercie (argyronet, LedZeppII, vodiem) pour toute l'aide donnée.