TUTOS.EU

Afficher les variables d'environnement

Retourner les variables système en VbScript

'Affichage des variables d'environnement en VbScript

Dim WSHShell
Dim vAPPDATA, vSystemDrive, vSystemRoot, vSESSIONNAME, vCOMPUTERNAME, vProgramFilesx32, vProgramFilesx64, vUserProfile, vHomePath, vHomeDrive

Set WSHShell = CreateObject("WScript.Shell")
vUserName = WSHShell.ExpandEnvironmentStrings("%USERNAME%") 'Pour le login du user
vAPPDATA = WSHShell.ExpandEnvironmentStrings("%APPDATA%")
vSystemDrive = WSHShell.ExpandEnvironmentStrings("%SystemDrive%") 'Retourne C: en général (sans le \ à la fin)
vSystemRoot = WSHShell.ExpandEnvironmentStrings("%systemroot%")
vUserProfile = WSHShell.ExpandEnvironmentStrings("%USERPROFILE%")
vHomePath = WSHShell.ExpandEnvironmentStrings("%HOMEPATH%")
vHomeDrive = WSHShell.ExpandEnvironmentStrings("%HOMEDRIVE%")
vSESSIONNAME = WSHShell.ExpandEnvironmentStrings("%SESSIONNAME%")
vCOMPUTERNAME = WSHShell.ExpandEnvironmentStrings("%COMPUTERNAME%")
vProgramFilesx32 = WSHShell.ExpandEnvironmentStrings("%programfiles(x86)%")
vProgramFilesx64 = WSHShell.ExpandEnvironmentStrings("%programfiles%")

If Left(vProgramFilesx32,1) = "%" Then
	'Si on est sur un système 32bits, alors le chemin du répertoire Program Files est dans vProgramFilesx64 et non vProgramFilesx32.
	'Du coup on recopie l'un dans l'autre et on efface la variable vProgramFilesx64
	vProgramFilesx32 = vProgramFilesx64
	vProgramFilesx64 = ""
End If

Wscript.echo "APPDATA : " & vAPPDATA
Wscript.echo "SystemDrive : " & vSystemDrive
Wscript.echo "SESSIONNAME : " & vSESSIONNAME
Wscript.echo "UserProfile : " & vUserProfile
Wscript.echo "Home Path : " & vHomePath
Wscript.echo "Home Drive : " & vHomeDrive
Wscript.echo "COMPUTERNAME : " & vCOMPUTERNAME
Wscript.echo "ProgramFilesx32 : " & vProgramFilesx32
Wscript.echo "ProgramFilesx64 : " & vProgramFilesx64

Set WSHShell = Nothing
Lien vers le fichier : cliquez ici

Pages Web

Site WebDescription
Article WikiArticle Wiki qui référencie les différentes variables d'environnement
Citrix Environment Variables for Streamed AppsVariables d'environment pour les applications stréamées
How to set environment variablesLes clés de registre qui définissent les variables d'environnement