Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1451 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Executer un ".vbs" à partir d'une page web

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Executer un ".vbs" à partir d'une page web

n°1901018
antolionux
Posté le 01-07-2009 à 12:15:40  profilanswer
 

Bonjour,  
 
Je dispose de plusieurs fichier *.vbs dans un dossier. (ces fichiers ont des fonctions diverses, installation de logiciel, création d'odbc, etc ...)
 
je voudrais faire une page web depuis laquelle je pourrais exécuter ces fichier .vbs
 
PS : Lorsque je fais un lien <a href> ça m'affiche le contenu du fichier, ça ne l'exécute pas.
 
Comment faire ?
Pouvez-vous m'aider ?
 
Merci  :jap:


Message édité par antolionux le 01-07-2009 à 12:17:32
mood
Publicité
Posté le 01-07-2009 à 12:15:40  profilanswer
 

n°1901090
olivthill
Posté le 01-07-2009 à 14:33:25  profilanswer
 

Voici une solution qui marche avec un lien ou avec un bouton

<html>
<head>
<script language="VBScript">
Public Sub exec_vbs()
   Set oShell = CreateObject("WScript.Shell" )
   oShell.Run "C:\chemin\test1.vbs"
   Set oShell = Nothing
End sub
</script>
</head>
 
<body>
<a href="javascript:(function(){exec_vbs();})()">Test</a>
<br><input type="button" value="Test" onclick="exec_vbs()">
</body>
</html>

Le lancement n'est pas toujours immédiat, il peut prendre deux à dix secondes.

n°1901297
antolionux
Posté le 01-07-2009 à 21:18:05  profilanswer
 

Merci pour ta réponse, je pourrais essayer ton code dès demain :-)

n°1901368
antolionux
Posté le 02-07-2009 à 08:51:06  profilanswer
 

Je viens de faire un test mais ça ne semble pas fonctionner, mes scripts ne s'exécutent pas.

n°1901393
olivthill
Posté le 02-07-2009 à 09:45:50  profilanswer
 

Ca marche chez moi, de deux endroits différents, deux systèmes différents.
Donc, il faudrait tester avec un programme hyper-simple, genre une seule ligne contenant wscript.echo "coucou", et mettre ce script en local dans un répertoire dont le chemin est simple (sans espace, ni caractère hors de l'alphabet anglais). A l'exécution, le navigateur demande bien sûr l'autorisation d'utiliser des ActiveX et il faut répondre "oui". Peut-être que dans certaines configurations le navigateur l'interdit sans proposer de lever cette interdiction. Il faudrait alors voir les options de sécurité du navigateur ou d'autres logiciels de sécurité pouvant empêcher cela.
Par ailleurs, si cela ne marche, il devrait y avoir un message d'erreur quelque part.
Bonne chance !

n°1901458
antolionux
Posté le 02-07-2009 à 11:48:57  profilanswer
 

Après plusieurs test, l'ouverture d'un exécutable tel que calc.exe ou cmd.exe fonctionne sans aucun problème qu'ils soit dans systeme32 où à l'emplacement des mes scripts.
 
Mon script lui ne se lance pas. c'est un .bat tout bête qui lance un .vbs
J'ai tenté de convertir mon .bat en .exe, mais ça ne fonctionne pas non plus
 
PS : le contenu du .vbs ne fait que copier un raccourci sur le bureau.

n°1901469
olivthill
Posté le 02-07-2009 à 12:06:10  profilanswer
 

Effectivement, pour un ".bat" c'est différent (mais je ne pouvais pas le deviner car ce n'était indiqué nul part dans la question).
Le ".bat" a besoin de cmd.exe (ou command.com pour les anciennes versions de Windows).
Voici une nouvelle version :

<html>
<head>
<script language="VBScript">
Public Sub exec_vbs()
   Set oShell = CreateObject("WScript.Shell" )
   oShell.Run "C:\blabla\echo1.vbs"
   Set oShell = Nothing
End sub
 
Public Sub exec_bat()
   Set oShell = CreateObject("WScript.Shell" )
   oShell.Run "cmd.exe /C C:\blabla\echo1.bat"
   Set oShell = Nothing
End sub
</script>
</head>
 
<body>
<a href="javascript:(function(){exec_vbs();})()">Lance .vbs directement</a>
<br><input type="button" value="Lance .vbs directement" onclick="exec_vbs()">
<p>
<a href="javascript:(function(){exec_bat();})()">Lance .bat</a>
<br><input type="button" value="Lance .bat" onclick="exec_bat()">
</body>
</html>

n°1901476
antolionux
Posté le 02-07-2009 à 12:17:41  profilanswer
 

Le .Vbs génère une erreur : chemin d'accès introuvable
Le .bat ne fait rien


Message édité par antolionux le 02-07-2009 à 12:20:35

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Executer un ".vbs" à partir d'une page web

 

Sujets relatifs
Générer une page HTML à partir de formulaire PHPCreer un fichier à partir de php
ouvrir une url dans une page en miniature[Résolu sans trop savoir comment] Ma page s'affiche très bas
[PHP] forcer actualisation après "page précédente" sur navigateur ?redirection à une page lors de la reconnaissance de l'IP
récupérer variable à partir d'un lien[asp.net sql] Executer un fichier .sql à partir d'une page .aspx
executer un prog c++ a partir d une page webExecuter un prog à partir d'une page HTML
Plus de sujets relatifs à : Executer un ".vbs" à partir d'une page web


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR