2009-08-03 7 views

Répondre

5

Il est peut-être plus facile de le faire avec un HTML Application plutôt qu'avec un simple VBScript. Voici un exemple d'application HTML qui affiche une image dans une fenêtre qui se ferme automatiquement après 5 secondes (vous n'avez pas précisé si vous deviez paramétrer le nom de l'image et le délai, donc je suppose qu'ils sont prédéfinis et peuvent être codés en dur)):

<html> 
    <hta:application id="oHTA" 
     border="none" 
     caption="no" 
     contextmenu="no" 
     innerborder="no" 
     scroll="no" 
     showintaskbar="no" 
    /> 
    <script language="VBScript"> 
     Sub Window_OnLoad 
      ' Resize and position the window 
      width = 500 : height = 400 
      window.resizeTo width, height 
      window.moveTo screen.availWidth\2 - width\2, screen.availHeight\2 - height\2 

      ' Automatically close the windows after 5 seconds 
      idTimer = window.setTimeout("vbscript:window.close", 5000) 
     End Sub 
    </script> 
<body> 
    <table border=0 width="100%" height="100%"> 
     <tr> 
      <td align="center" valign="middle"> 
       <img src="myimage.jpg"/> 
      </td> 
     </tr> 
    </table> 
</body> 
</html> 

Il suffit de coller ce code dans un éditeur de texte, remplacez la largeur de la fenêtre et de la hauteur, le délai d'attente et le nom du fichier image avec vos valeurs et enregistrer en tant que fichier .hta (par exemple showimage.hta) .

Les HTA peuvent être exécutés à partir de la ligne de commande par leur nom, par ex.

showimage.hta 

Pour exécuter une HTA de VBScript, vous pouvez utiliser la méthode WshShell.Run:

CreateObject("WScript.Shell").Run "showimage.hta" 
+0

Merci l'homme son beau travail. – Kthevar

Questions connexes