none
Problème sur variable d'environnement ? RRS feed

  • Question

  • Bonjour,

    Je n'arrive pas à faire fonctionner les variables d'environnement (si ça marche encore en vbNet Vista ?) ?

    Quand je lis la variable elle est vide, voici mon code :

    Public Class Form1
    
     Private Declare Function SetEnvironmentVariable Lib "kernel32" Alias _
      "SetEnvironmentVariableA" (ByVal lpName As String, _
      ByVal lpValue As String) As Long
    
     Private Declare Function GetEnvironmentVariable Lib "kernel32" Alias _
      "GetEnvironmentVariableA" (ByVal lpName As String, _
      ByVal lpBuffer As String, ByVal nSize As Long) As Long
    
     Dim nomLogiciel As String = "vbNet couleurs et pixels"
     Dim numeroVersion As String = "1.0 © 2010 -2010"
    
     Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
      Dim varRecupe As String = "" ' a propos EXE
      SetEnvironmentVariable("nomLogiciel", nomLogiciel) ' stock
      SetEnvironmentVariable("numeroVersion", numeroVersion)
      GetEnvironmentVariable("nomLogiciel", varRecupe, Len(nomLogiciel)) ' destock
      MsgBox(varRecupe)
     End Sub
    
    End Class
    
    

    Merci, cordialement.

     

     


    Joseph Attila PUSZTAY
    EhJoe       Logiciels       Romans       Ecrire
    mardi 24 août 2010 14:18

Réponses

Toutes les réponses