[R] Réutilisé les variables d' une GUICtrlCreateInput

[hakim]

Bonjour,

Dans mon script, j'ouvre une boite de dialogue :
Cette boite "Demande" plusieurs champs" que je désir mettre dans une variable.

Puis une fois ces variable renseignées par l'utilisateur, je passe ces variables en argument à une application :

Code : Tout sélectionner

;Définition de la boite de dialogue

GUICreate("Connexion VPN  -  World companie ",375,500)
GUICtrlCreateLabel ("URL du serveur VPN:",10,15)
$VPNSRV = GUICtrlCreateInput ("blablalba :port",150,10,200 )        ;saisie : serveur vpn 
GUICtrlCreateLabel ("Login :",10,45)                                            ;saisie :  username, 
$username = GUICtrlCreateInput ("Saisissez ici le nom de l'utilisateur",150,40,200,$username)       
GUICtrlCreateLabel ("Mot de passe   :",10,75)                   ;saisie :password               
$Password = GUICtrlCreateInput ("",150,70,200,20,$ES_PASSWORD)                          
...

plus bas ...

...

;utilisation des variables,  afin de passer celles ci en argument à mon application.
$Program = 'C:\Program Files\Fortinet\SSLVPNclient\FortiSSLVPNclient.exe'
$params = "connect  -h " & $VPNSRV & " -u """ & $username & """:"""  & $ES_PASSWORD & """"
; deja essayé avec $Password ça ne passe pas non plus...un truc m'echappe !

ShellExecute ($Program, $params)
 

Le hic, c'est que les variables ne semble pas être mémorisées via cette boite de dialogue, alors qu'avec

Code : Tout sélectionner

$VPNSRV = InputBox("Serveur VPN", "adresse du serveur VPN", "blablabla:nport", "",10,5)
     $username = InputBox("Entrez identifiant", "Login", "", "")
     $Password = InputBox("Entrez Mot de passe", "Password", "", "*")
 

je n'est pas ce soucis ....

L'idée du script est de créer une seul interface, ou l'utilisateur renseigne puis clique une fois sur OK, et non pas plusieurs fois, comme le nécessite "Inputbox".


Merci de votre aide.

Script entier sur demande...

[hakim]

Hello !!

pour info je pense avoir trouvé !!

voici les éléments à ajouter aux codes :

Code : Tout sélectionner

$Program = 'C:\Program Files\Fortinet\SSLVPNclient\FortiSSLVPNclient.exe'
$params = "connect  -h " & [b]GUICtrlRead($VPNSRV,0)[/b] & " -u """ & [b]GUICtrlRead($username,0)[/b] & """:"""  & [b]GUICtrlRead($Password,0)[/b] & """"
ShellExecute ($Program, $params)

 

Corrigez moi si j'ai faux, mais ça m'a l'air d'être ok.

[Tlem]

C'est tout à fait ça ...
Car la valeur récupérée par la création d'un objet graphique, n'est pas sont contenu mais son identifiant.

On peut assimiler cela à une plaque d'immatriculation. Cette plaque permet d'interroger le propriétaire afin de connaitre certains élément le composant, ou tout simplement pour lui affecter différentes commandes.