Yves Pointin
2012-09-22 08:14:53 UTC
Bonjour,
Sur un PC sous Window XP avec ActivePerl, un programme d'acquisition
d'un capteur qui s'exécute comme un service, génère régulièrement une
erreur Window qui fait apparaître une fenêtre d'erreur dans laquelle il
faut cliquer sur un bouton oui ou non pour lancer ou non le debogger
Windows. Le problème est que le programme d'acquisition s'arrête et ne
se relance que si on clique sur le bouton non. J'aimerais faire un
programme Perl qui toutes les 5 minutes vérifierait si une fenêtre
d'erreur existe, déterminerait quel est le programme père qui l'a fait
apparaître ou qui récupérerait le texte écrit, et qui cliquerait sur non
ou tuerait la fenêtre.
Toutes suggestions concernant le(s) module(s) à utiliser et la manière
de faire serait les bienvenue.
Cordialement,
Sur un PC sous Window XP avec ActivePerl, un programme d'acquisition
d'un capteur qui s'exécute comme un service, génère régulièrement une
erreur Window qui fait apparaître une fenêtre d'erreur dans laquelle il
faut cliquer sur un bouton oui ou non pour lancer ou non le debogger
Windows. Le problème est que le programme d'acquisition s'arrête et ne
se relance que si on clique sur le bouton non. J'aimerais faire un
programme Perl qui toutes les 5 minutes vérifierait si une fenêtre
d'erreur existe, déterminerait quel est le programme père qui l'a fait
apparaître ou qui récupérerait le texte écrit, et qui cliquerait sur non
ou tuerait la fenêtre.
Toutes suggestions concernant le(s) module(s) à utiliser et la manière
de faire serait les bienvenue.
Cordialement,
--
Dr. POINTIN Yves B.
perl -e "\$_='.frontermpclv-***@optinoinY.P';1 while
s/(.{3})(.{3})?/\$_{\$2}=\$1,\$2/e; ; print while \$_=\$_{\$_};"
Dr. POINTIN Yves B.
perl -e "\$_='.frontermpclv-***@optinoinY.P';1 while
s/(.{3})(.{3})?/\$_{\$2}=\$1,\$2/e; ; print while \$_=\$_{\$_};"