Salut,
Je cherche le moyen de vérifier la présence d'une variable d'environnement bien spécifique. Quelqu'un sait comment faire?
Salut,
Je cherche le moyen de vérifier la présence d'une variable d'environnement bien spécifique. Quelqu'un sait comment faire?
Pourquoi vouloir ré-inventer la roue...
...Surtout si c'est pour la faire carrée...
J'ai trouvé une solution qui me satisfait, je la laisse pour les éventuels demandeurs...
Dans mon exemple, je recherche une variable d'environnement appelée JAVA_HOME et je teste la présence de postgreSQL dans le path.
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 Set objShell = WScript.CreateObject("WScript.Shell") Set colSystemEnvVars = objShell.Environment("System") Set colUserEnvVars = objShell.Environment("User") dim displayText displayText ="Il vous est inutile de continuer l'installation car : "& vbCrLf dim flag flag =0 if (trim(colSystemEnvVars("JAVA_HOME")) = "") then if (trim(colUserEnvVars("JAVA_HOME")) = "") then displayText = displayText & " - JAVA_HOME n'est pas defini dans les variables d'environnement "& vbCrLf flag = 1 end if end if if (INSTR(colSystemEnvVars("PATH"),"PostgreSQL")=0) then displayText = displayText & " - PostgreSQL n'est pas defini dans les variables d'environnement (PATH)"& vbCrLf flag = 1 end if if (flag=1) then displayError(displayText) end if function displayError(displayText) msgbox displayText,vbCritical,"Erreur rencontrée" end function
Pourquoi vouloir ré-inventer la roue...
...Surtout si c'est pour la faire carrée...
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