Équivalent d'un .bat (Batch) en .vbs (VirtualBasicScript).

Résolu/Fermé
Melvyn301 Messages postés 121 Date d'inscription mardi 9 juillet 2013 Statut Membre Dernière intervention 18 décembre 2014 - 15 avril 2014 à 20:25
Melvyn301 Messages postés 121 Date d'inscription mardi 9 juillet 2013 Statut Membre Dernière intervention 18 décembre 2014 - 27 avril 2014 à 10:15
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.
A voir également:

3 réponses

ElementW Messages postés 4816 Date d'inscription dimanche 12 juin 2011 Statut Contributeur Dernière intervention 5 octobre 2021 1 228
Modifié par gravgun le 16/04/2014 à 15:29
'lut, la commande
set
en batch paramètre une variable d'environnement, en VBScript c'est
CreateObject("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
1
Melvyn301 Messages postés 121 Date d'inscription mardi 9 juillet 2013 Statut Membre Dernière intervention 18 décembre 2014 17
16 avril 2014 à 18:05
Re,

Je comprends un peu ce que veule dire les codes mais dans qu'elle ordre faut il les mettre ?
0
ElementW Messages postés 4816 Date d'inscription dimanche 12 juin 2011 Statut Contributeur Dernière intervention 5 octobre 2021 1 228
16 avril 2014 à 22:26
En fait je t'ai donné une traduction complète de ton script, avec des détails.
Les
Set
dans ce code paramètrent des variables propres au script, elles ne sont pas accessibles en dehors; à l'instar de la variable APPDATA qui sera affectée en dehors du script.
0
Melvyn301 Messages postés 121 Date d'inscription mardi 9 juillet 2013 Statut Membre Dernière intervention 18 décembre 2014 17
17 avril 2014 à 12:48
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.
0
Melvyn301 Messages postés 121 Date d'inscription mardi 9 juillet 2013 Statut Membre Dernière intervention 18 décembre 2014 17
26 avril 2014 à 19:50
Je viens de m'apercevoir que j'ai oublier une ligne du code (Je suis vraiment désoler) :

@echo off
set APPDATA=%CD%\data
bin\Minecraft.exe
exit
0