Bonjour,
Je cherche à ouvrir un fichier pdf de tutoriel lorsque je clique sur un bouton de ma fenêtre hta. Problème, je ne trouve aucune info sur comment le programmer. Merci.
Bonjour,
Je cherche à ouvrir un fichier pdf de tutoriel lorsque je clique sur un bouton de ma fenêtre hta. Problème, je ne trouve aucune info sur comment le programmer. Merci.
voila un exemple de HTA qui utilise des boutons pour lancer quelques programmes comme internet explorer, Calculatrice et FireFox donc il suffit de mentionner le bon chemin de votre PDF à ouvrir.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32 <HTML> <HEAD> <style> body{ background-color: lightblue; } label,.btn{ font-weight: bold; } </style> <SCRIPT TYPE="text/Vbscript"> Sub Run(var) Set WS = CreateObject("WScript.shell") ProgramFiles = WS.ExpandEnvironmentStrings("%programfiles%") Select Case var Case 1 WS.run("calc.exe") Case 2 WS.run("iexplore.exe") Case 3 command = "Cmd /C cd %programfiles%\Mozilla Firefox\ | start firefox.exe" Result = WS.Run(Command,0,True) End select End Sub </SCRIPT> </HEAD> <BODY> <INPUT TYPE="button" onclick="Run(1)" VALUE="Run Calc.exe"> <INPUT TYPE="button" onclick="Run(2)" VALUE="Run IExplore.exe"> <INPUT TYPE="button" onclick="Run(3)" VALUE="Run FireFox.exe"> </BODY> </HTML>
Bonjour,
Merci pour l'aide, il me manquait la commande Run à mon vocabulaire.
J'ai adapté le bout de code qui donne ca maintenant.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub Aide Set WS = CreateObject("WScript.shell") WS.run("Tutorial.pdf") End Sub <body> <BODY BGCOLOR="CFD6D2"> <input type="button" value="help" onClick="Aide"> </body>
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager