VBS afficher le nom de la session windows

Bonjour à tous,
J'ai fait un programme en VBS avec le bloc note,
mais j'ai une question y a t il y code qui permet de relever et d'afficher dans une msgbox le nom de l'utilisateur la session windows utilisée ???

Merci d'avance :)

2 réponses

  1. Essaie avec ce bout de code :

    wscript.echo oWshShell.ExpandEnvironmentStrings("Username=%UserName%") 

    1. Merci beaucoup :)
      mais ce n'est pas ce que je veux !!!

      Ce que je veux c'est crée une variable dans lequel je veux stocker le nom de la session pour pouvoir par la suite écrire

      msgbox variable


      Un très grand merci d'avance ;)
    2. Dans ce cas :
      Dim variable
      variable = oWshShell.ExpandEnvironmentStrings("%UserName%")  
      msgBox variable
    3. Merci mais cela me marque "Erreur : Objet requis: oWshShell

      Comment régler ce problème ???

      PS:
      Le code est:

      dim user
      user = oWshShell.ExpandEnvironmentStrings("%UserName%")
      msgbox user
      
    4. dim user
      Set wshShell = CreateObject("Wscript.Shell")
      user = oWshShell.ExpandEnvironmentStrings("%UserName%")
      msgbox user