Équivalent d'un .bat (Batch) en .vbs (VirtualBasicScript).
Résolu
Melvyn301
Messages postés
120
Date d'inscription
Statut
Membre
Dernière intervention
-
Melvyn301 Messages postés 120 Date d'inscription Statut Membre Dernière intervention -
Melvyn301 Messages postés 120 Date d'inscription Statut Membre Dernière intervention -
Bonsoir :),
je suis débutant en Vbs et je cherche depuis peu l'équivalent d'un bat en vbs.
Voici le code en question (Il est très simple à comprendre) :
@echo off
set APPDATA=%CD%\data
exit
Merci à tout ce qui pourrons m'aider.
--
Chocapic c'est fort en chocolat !!!! Tu l'as lu en chantant hein ? :p
je suis débutant en Vbs et je cherche depuis peu l'équivalent d'un bat en vbs.
Voici le code en question (Il est très simple à comprendre) :
@echo off
set APPDATA=%CD%\data
exit
Merci à tout ce qui pourrons m'aider.
--
Chocapic c'est fort en chocolat !!!! Tu l'as lu en chantant hein ? :p
3 réponses
-
'lut, la commande
set
en batch paramètre une variable d'environnement, en VBScript c'estCreateObject("WScript.Shell").Environment("SYSTEM")qu'il faut utiliser, c'est un tableau variable/valeur:Set wshShell = CreateObject("WScript.Shell") Set wshSystemEnv = wshShell.Environment("SYSTEM") wshSystemEnv( "APPDATA" ) = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")+"\data"CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")correspond au%CD%
.
from human import idiocy
del idiocy-
-
-
Donc pour le .bat en .vbs ça donne :
Set wshShell = CreateObject("WScript.Shell")
Set wshSystemEnv = wshShell.Environment("SYSTEM")
wshSystemEnv( "APPDATA" ) = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")+"\data"
Excuse moi si je ne comprend pas mais je connais à penne le vbs. -
-
-
-
Re,
Jai trouver la solution :
https://www.developpez.net/forums/d1435035/autres-langages/general-visual-basic-6-vbscript/vbscript/equivalent-d-bat-batch-vbs-virsualbasicscript/
Merci gravgun :D