'******************************************************* Set WshShell = WScript.CreateObject("WScript.Shell") Set WshProcEnv = WshShell.Environment("Process") strSessionName = WshProcEnv("SESSIONNAME") If Left(strSessionName, 3) = "RDP" then WScript.Echo "Session RDP = " & strSessionName Else WScript.Echo "Session pas RDP" End If '*******************************************************