Discussion :

[obie78]

--------------------------------------------------------------------------------

Salut à Tous,

Je reviens sur ce forum car j'ai un petit soucis au niveau de l'attribution de plusieurs parametres à un userform.

Petit topo:

J’ai créé un userform avec un bouton de commande permettant d’ouvrir une connexion Telnet, de me connecter à un serveur unix et de faire a peu pres ce que je veux car j’utilise des SendKeys.

Voici le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
 
 
    Dim EnterKey As String
    '--------------------------
 
EnterKey = "~"
 
    '--------------------------
 
On Error GoTo 0
Shell "telnet serveur port", vbMaximizedFocus
 
DoEvents
 
 
'----------------------
'LOGIN
 
   Application.Wait Now + TimeValue("00:00:03")
   SendKeys "login", False '=========> login
 
   SendKeys EnterKey, False
 
'----------------------
'PASSWORD
 
    Application.Wait Now + TimeValue("00:00:02")
    SendKeys "password", False '========> mot de passe
 
    SendKeys EnterKey, False
 
'----------------------
‘exemple commande
 
    Application.Wait Now + TimeValue("00:00:02")
    SendKeys "cp fichier1 repertoire1", False
 
    SendKeys EnterKey, False
    Application.Wait Now + TimeValue("00:00:01")
    SendKeys "exit", False
    Application.Wait Now + TimeValue("00:00:01")
SendKeys EnterKey, False

Je fais ca, car je dois exécuter 2 commandes. Cependant cette commande va prendre en paramètre 2 éléments qui peuvent différer selon ce que souhaite le user.

Pour prendre un exemple : une commande : « .cp fichier1 repertoire1 ». Il y a a la racine du compte par exemple 20 Fichiers et 20 répertoires.

Donc ce que j’aimerais, c’est que au niveau du bouton commande du userform, il donne la possibilité a l’utilisateur de choisir le fichier et le répertoire. C'était juste un exemple.

Précisément, au niveau de mon cas:
je dois:
1- aller dans un répertoire précis(OK)
2- lancer un des executables du dossier, donc . fichierexe; la il faudra que le user choisisse l'exe qu'il veut parmi une liste défini(les exe du repertoire)(NOT OK)
3- enfin à la racine du compte, lancer un script shell qui prend en parametre 2 éléments: 1 chiffre (un chiffre à 2 digits que le user choisira aussi), et un PATH avec le nom d'un fichier a créer.ex: script.sh "2" "/home/user/nom_écrit_par_user". (NOT OK)

Je ne sais pas du tout comment faire cela, je ne vois même pas visuellement ce qui peut etre possible de faire. Pour l'étape 2: une combobox qui s'affiche et l’utilisateur choisit l'executable parmi la liste. Pour l'étape 3 l’utilisateur écritdans des labels le chiffre, et le nom du fichier au niveau du usf et ca modifie le code directement. Apres je ne sais pas du tout comment alimenter la liste. Je me tourne donc vers vous, en tant que connaisseurs, si vous avez des solutions au niveau de la facon de procéder.

Je vous remercie d'avance.

[obie78]

Personne ne sait?

petites précisions:


J'ai 2 "scripts" à executer.L'un prend 1 parametre(qui sera "un fichier parmi plusieurs dans un repertoire précis), puis un second qui prendra 2 parametres.
Ce que j’aimerais, c’est que au niveau du bouton commande du userform, il donne la possibilité a l’utilisateur de choisir ces parametres.

En gros l'utilisateur va cliquer sur le bouton commande du userform,la une fenetre apparait pour que l'utilsateur tape le parametre du premier script,puis il valide, et la une seconde fenetre apparait pour choisir les 2 parametres du second script,puis il valide et donc a ce moment ,tout le processus va etre lancer(connexion telnet et les scripts avec les parametres choisis).

Le 2eme script est sous cette forme: prend en parametre 2 éléments: 1 chiffre (un chiffre à 2 digits que le user choisira), et un PATH avec le nom d'un fichier a créer.ex: script.sh "2" "/home/user/nom_écrit_par_user".

Ce qui serait bien, c'est que l'utilisateur écrit dans la fenetre de parametre par exemple "2" et "Fichiertest1" et lors de l'exection de la fenetetre telnet, on envoie les sendkeys correspondant à cela.