création d'une variable dont je reçois le nom et la valeur en paramètres d'entré

Question

Bonjour,

j'ai créé un projet VB qui reçoit en paramètres d'entrée les noms et les valeurs de variables

exemple :
   projet.exe VARIABLE1=VALEUR1 VARIABLE2=VALEUR2 ...

je souhaite dans mon projet pouvoir récupérer ces parametres d'entree (facile)
et pouvoir en quelque sorte "évaluer" ces paramètres, çad,
pouvoir créer des variables VARIABLE1 et VARIABLE2 et leur attribuer les
valeurs VALEUR1 et VALEUR2 ...

Merci beaucoup pour votre aide !!

Thierry

PCPT · Answer

salut,
c'est pas du PHP. tu ne peux pas cr&#233;er de variables en cours d'execution
@+   PCPT   [AFCK]

cs_rt15 · Answer

Tu faire un tableau par type de ton choix (Ici, ce serait peut être pas beaucoup plus rapide à l'execution) + un tableau de chaîne par tableau (pour les noms). Le lien sera que les deux ont le même indexe. 

dim AintTab() as Long
dim AstrIntNames() as String

Initialisation:
redim  AintTab(0 to 0)
redim  AstrIntNames(0 to 0)

Ajout d'une variable:
redim preserve AintTab(0 to Ubound(AintTab) + 1)
redim  preserve AstrIntNames(0 to Ubound(AstrIntNames) + 1)
AintTab(Ubound(AintTab))= 15
AstrIntNames(Ubound(AstrIntNames))= "Nomdelavariable"

Pour la suppression, tu remplaces la variable à supprimer par la dernière du tableau, et du redimenssionne en bound(AstrIntNames) - 1. L'indexe aura changé, mais comme tu le change dans les deux tableaux, pas de soucis !

cs_rt15 · Answer

Désolé pcpt.

Houla, je viens de contredire un expérimenté sans le faire exprès !

PCPT · Answer

rt15 -> ta m&#233;thode, largement simplifiable stoquerait alors 2 cha&#238;nes * nombre d'ensembles.
donc en aucun cas on ne peut cr&#233;er un variable...
@+ ;)

cs_rt15 · Answer

Une variable seule, non, pas en VB tout seul.

Mais on peut simuler la mémoire.

2 chaînes * nombre d'ensembles

Je proposait plutôt: 1 tableau par type + son tableau de chaînes.

largement simplifiable ? comment ?

25230 · Answer

bon, et bien en tous les cas, merci beaucoup pour vos réponses.
Si je comprends bien, il ne me reste plus qu'à trouver une autre solution ...

Merci,
Thierry

cs_CanisLupus · Answer

Salut. D'une part, en vb6, impossible de cr&#233;er des variables "&#224; la vol&#233;e" sans passer par des astuces beaucoup trop lourdes.

D'autre part, les param&#232;tres en entr&#233;e d'un exe sont capt&#233;s par la fonction Command(), voir la MSDN. Ca, tu dis le savoir donc c'est OK je ne t'apprendrai pas comment t'en servir. 

Puisque c'est toi qui &#233;crit le prog, tu dois savoir ce que ton prog doit attendre comme param&#232;tres et pr&#233;voir les variables correspondantes.
Donc, o&#249; est le probl&#232;me ?

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

PCPT · Answer

rt15 -> voici une méthode pour alléger.... cependant, comme pas de buffer, toutes les pseudos-variables doivent avoir le même nombre de caractères Option Explicit ' Dim aResultats() As String ' ' Private Sub Command1_Click() Dim sRecue As String: sRecue = "projet.exe VARIABLE1=VALEUR1 VARIABLE2=VALEUR2 VARIABLE3=VALEUR3" ' on vire 'projet.exe " sRecue = RightB$(sRecue, LenB (sRecue) - InStrB(1, sRecue, " ") - 1) ' on récupère les ensembles Dim aRecues() As String aRecues = Split(sRecue, " ") ' on sauve ReDim aResultats(UBound(aRecues), 1) Dim i As Long For i = 0 To UBound (aRecues) aResultats(i, 0) = LeftB$(aRecues(i), InStrB(1, aRecues(i), "=") - 1) aResultats(i, 1) = RightB$(aRecues(i), InStrB(1, aRecues(i), "=") - 5) Debug.Print aResultats(i, 0) & "~" & aResultats(i, 1) Next i End Sub Coloration syntaxique automatique [AFCK] ++ PCPT [AFCK]

cs_rt15 · Answer

Merci  pcpt.

Heu, cela ressemble beaucoup à ce que je disais, sur le principe en tout cas, non ?

Par contre, il existe l'objet collection, (et dictionary, dont j'ai vaguement entendu parler) qui permettent peut être  de se débarrasser du tableau à deux dimensions de Strings, et de simplifier fortement l'accès et la suppression.

25230

Heu, ou est le problème sur le principe de stocker sois même ses variables dans un tableaux ou une liste ?

PCPT · Answer

rt15-> salut

j'ai simplifi&#233;, &#224; ta demande. &#231;&#224; resemble en effet, mais il y a beaucoup moins de traitements (c'est le principe!!!)

et il n'y a aucun probl&#232;me &#224; stoquer en tableau, c'est juste que ce n'est pas la demande de 25230 ; demande irr&#233;alisable!!!
(d&#233;sol&#233; de r&#233;pondre plus ou moins &#224; sa place)
voil&#224; tout ;)

dictionary ? sous VB6 ? l&#224; je voudrais bien en savoir plus ...
++
PCPT  [AFCK]

cs_rt15 · Answer

pcpt

Vi vi tu as fait précisément ce que tu disias que tu allais faire, et même mieux, tu as découpé l'entrée.

Dictionary (ou Dictionnary ou ?) Je dois avoir ça qui traîne au fond de mon PC. Je vais essayer de te le déloger. 

25230

Y a presque forcément moyen de faire ce dont tu parles.

Tu peux être plus précis sur l'emplois de tes variables ?

cs_rt15 · Answer

pcpt.

En fait, je crois que Dictionary vat pas t'intéresser !

Il semblerait que ce soit du script (Au même titre que FileSystemObject, connu pour ces problèmes et sa lenteur sur ce site)!

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/VBRef98/html/vbmscLROverview.asp

Par contre, il doit être agréable d'emplois.

Désolé, fausse piste.

Si tu veux plus d'infos, je reste à ta dispo.

PCPT · Answer

re,
ton lien ne m&#232;ne sur aucune page ~exacte~
&#231;&#224; m'int&#233;resse juste par curiosit&#233; ;)

cs_rt15 · Answer

Exact: mon lien mène au chapitre ! C'est chiant ça... Encore pardon.

Bon, du chapitre, tu clique sur "Language Reference" (sur la gauche)

Puis sur "Objects" (sur la gauche aussi).

Puis sur "D" (A... gauche !)

Puis sur  "Dictionary Object" (Pour changer, à gauche)

Et là t"es sur la page principale de Dictionary sous VB6.

Tu constates que la classe est cée à partir de Scripting.Dictionary.

FileSystemObject est issue de Scripting.FileSystemObject

Les deux ont le même comportement (Pas de complémentation auto du code).

J'en conclu que dictionary est du script.

Sinon, c'est le même principe que collection, mais avec plus de méthodes, et moins de possibilité, je crois (pas de Dictionary d'objets quelconques).

PCPT · Answer

salut,
vu. ok, merci. t'avais raison, c'est pas int&#233;ressant.
(et apparemment pas non plus utile pour 25230)

+
PCPT    [AFCK]

Création d'une variable dont je reçois le nom et la valeur en paramètres d'entré

15 réponses

Discussions similaires