Discussion :

[pierre.zelb]

Est ce possible ?

[omen999]

oui
lire, écrire (quand c'est autorisé évidemment)
l'exemple de la gestion du clipboard par l'api dans les contributions vb6 donne les pistes pour...

[pierre.zelb]

ok si j'en ai rebesoin j'irais voir.

Pour l'instant j'ai réussi à contourner mon problème du jour en utilisant une autre fonction d'API (GetEnvironmentVariable à la place de GetEnvironmentStrings pour la petite histoire)

Récupérer une variables d'environnement système avec VBScript, c'est possible. Voila ma contribution :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Dim env : env = ""
 
   ' Recuperation de la variable d'environement %MAVAR% si elle existe
 
   Const CF_NAME = "MAVAR"
   Const t_BUFF = "BUFF_t" : Dim p_BUFF : p_BUFF = oATO.CreateTypDef(t_BUFF, 250)
   Const CF_SIZE = 250
 
   oATO.PutString(t_BUFF, 0) = String(250, vbNullChar )
   Call oATO.CallAPI("kernel32.dll", "GetEnvironmentVariableA",CF_NAME,p_BUFF,CF_SIZE)   
   env = oATO.GetString(t_BUFF, 0)
 
' Note : si la variable d'environnement n existe pas, alors env contient une chaine de 260 fois la carctere ASCII codé 0