Examine (avec le log. Super Macro)

Bonjour,

Je voudrai écrire une macro pour faire des captures écran toutes les 15 mn.

Variable : nombre total de capture (nbcapttotal)
Message : vous devez choisir un multiple de 4
Question : combien de captures voulez-vous ?

examine : nbcapttotal =96
examine : nbcapttotal =92
examine : nbcapttotal =88
...........
...............
............
.........
examine : nbcapttotal =4

Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 1.bmp;
Pause 15 mn
Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 2.bmp;
Pause 15 mn
........................
....................
..................
.................
Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 96.bmp;


Comment puis-je indiquer à la macro que si la réponse à la question est par exemple 28, de faire que 28 captures et s'arrêter.

Merci d'avance.

Alain
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. ta macro doit avoir une forme :

    _Début
    gadgets (ta question utilisateur "nombre désiré" => var A , etc)
    boucle
    impression écran
    enregistrement image
    compteur incrémental => var B
    Pause 15mn
    comparateur B<A
    fin boucle
    autres gadgets( traitement des images, renommer le dossier les contenants...)
    Fin_

    le compteur incrémental ajoute 1 à une variable a chaque fois que ton bidule prend une photo écran. le comparateur regarde si cette variable est inférieure ou non à la variable nombre désiré (cad vérifie qu'on a pas atteint le nombre max de photo a prendre) selon le résultat il sort de la boucle ou non. ainsi:

    |
    Question (nom du prog);combien de photo à prendre? (entrez un multiple de 4;<A>
    Label <Label1>
    |
    (ton truc a prendre les photos écran)
    |
    Calcul <B>;+;1
    Examine <B>;<;<A>
    Goto <Label1>
    Pause 00:00:00
    |
    (la suite du prog)
    |

    Il reste un problème dans cette manière de faire: tu preneur d'image écran doit à chaque fois donner un nom différent à la photo prise, pour ne pas écraser la précédente. Une autre solution où ce pb ne se pose pas, est de préparer autant de fois que nécessaire le système de photo écran, et en controlant à chaque fois après qu'on ai pas ateint le nombre max, sans quoi il faut sauter directement à la fin. du style :

    |
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 1.bmp;
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 2.bmp;
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 3.bmp;
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 4.bmp;
    Examine 4;<;<A>
    Pause 15 mn
    Goto <Labelfinal>
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 5.bmp;
    Pause 15 mn
    |
    etc
    |
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 96.bmp;
    Label <Labelfinal>
    |
    (suite du programme)

    là ca marcheras , je te l'assure. mais que c'est long à programmer. meme en copiant-collant le bazar 24 fois, il faut a chaque fois remplacer les valeurs dans les repertoire : capture n.bmp et dans les examine (selon un multiple de 4)
    1. Bonjour, désolé de deterrer mais il y a bien plus simple et ca pourra aider les prochains qui se poseront la question:

      créer 5 variables
      indice = 1 en numérique
      nb_boucle = 10 en numérique (ou a poser en question utilisateur)
      var1 = C:\Program Files\Captures\capture en alpha
      extension=.bmp en alpha
      chemin= en alpha (nom vide)

      ensuite tu boucles:
      label début boucle
      examine indice < nb_boucle
      si oui, goto suite boucle
      si non goto fin boucle
      label suite_boucle
      calcul évolué: chemin=var1+indice+extension
      Outil Ecran Copier vers bmp;chemin
      calcul évolué: indice = indice+1
      Pause 15 mn
      goto debut boucle
      label fin boucle

      Cordialement