voilà j’ai creer un petit fichier hta dans lequel j’ai mis une image qui permet de fermer le fichier…
Mais peut-ont mettre un message de confirmation en vbs?? :heink:
J’ai essayer cela mais sa ne marche pas et je ne voit pas comment faire. :etonne2:
<script type="text/Vbscript">
<!--
Sub fermer_onclick()
result=msgbox ("Voulez vous vraiment quittez?",vbyesno+vbquestion)
if result=vbyes then window.close
End Sub
-->
</script>
Pourquoi du vbscript et pas du javascript ?
sinon, il faut qu’à un endroit de ton code tu lui dises d’aller chercher la fonction (avec onclick, par exemple)
Lorsque je lance le programme au demarage il me met un message comme quoi il y à une erreur dans le script de la page.
Ensuite il lance le programme et lorsque je clique sur l’image pour fermer le programme il me remet un message comme quoi il y a une erreur dans le script puis il revient au programme. :neutre:
Non, on ne s’est pas compris :
La question c’est de savoir avec quel logiciel tu exécutes ton programme, et comment tu fais pour le lancer (double clic sur l’icone, ligne de commande, ligne d’adresse etc)
Un hta c’est une application html donc lorsque l’ont double clic dessus sa ouvre le programme dans une fenetre et sa affiche le contenu de la page :neutre:
Le html ca ne s’ouvre pas tout seul
Enfin, pas chez moi ; et ca ne se présente pas du tout pareil selon qu’on l’ouvre avec notepad, avec firefox ou avec dreamweaver
J’ai editer mon hta avec notepad++ si c’est sa que vous voulez savoir
Lorsque je clique sur mon fichier hta on utilise le programme mshta qui ce situ dans le dossier c:\windows\system32 pour les utilisateurs windows.
Bon, en fait, le script que tu as donné au début n’est pas le même que celui que tu utilises ; pas étonnant qu’on n’ait pas le même résultat !
En fait, ton script ne s’exécute pas parce qu’il a une erreur de syntaxe.
C’est une subtilité des VB (vbs, vba …) result=msgbox (“test du message”,vbyesno+vbcritical)
ici, msgbox retourne une valeur ; c’est donc la fonction msgbox ; ses arguments doivent être mis entre parenthèses
if result=vbno then msgbox (“ok”,vbokonly+vbquestion)
ici, msgbox ne retourne pas de valeur ; c’est donc le submsgbox ; ses arguments doivent être écrits sans parenthèses
La bonne syntaxe est
if result=vbno then msgbox “ok”,vbokonly+vbquestion