Discussion :

[faressam]

Bonjour,

Fichier 1 :
Dans un fichier .vbs ou wsf, j'ai inseré des données dans des balises <ENTITY> <Label> etc ... quelques valeurs.


Fichier 2 :
Puis après dans un autre fichier je souhaite récupérer ces valeurs, de telle sorte à stocker toutes les valeurs d'une liste dans une seule variable qui fait partie de ma boucle de test

Y'a t'il un moyen pour récupérer toutes les valeurs contenues dans une balise par ex : <ENTITY> dans une variable, sur laquelle je pourrais faire mon test (avec une boucle).

Merci d'avance.

[ced600]

Heu oui certainement, mais si tu veux une réponse plus complète, il va falloir que tu explique un peu plus ce que tu fias et ce que tu veux faire.

[faressam]

En faite j'ai fait ceci:

Donnée dans un fichier texte,
puis dans un fichier .VBS, j'ai mis le script qui permet de lire un fichier txt, puis d'afficher (Readline : ligne par ligne ou ReadAll : Lire tous d'un coup).

ça c'est fait et ça marche bien

De l'autre côté j'ai une table, que laquel je me suis connecter,
Je cherche à extraire le Nom de la première colonne de ma table, et le comparaitre avec la premiére donnée lu de mon fichier texte.

Et sur ce point là, je suis bloqué sur la connexion à la table, et
l'extraction colonnes par colonnes de la table :

Var1 = Colonne 1
Var2 = Colonne 2
etc ...

MErci.

[ced600]

et ta table elle provient d'une base de donnée ? Si oui laquelle ?
Ou bien utilises tu excel, exchange, ou autre ?

[faressam]

et ta table elle provient d'une base de donnée ? Si oui laquelle ?
Ou bien utilises tu excel, exchange, ou autre ?

C'est une table Oracle,
mais tous ce qui est connection c'est ok,

il nous reste qu'a prendre les noms des colonnes de la table via le script,
et réinserer pour chaque noms colonnes un autre nom.(comme mentioné en haut).

[ced600]

Encore une fois, si tout ce qui te manque c'est de récupérer et insérer des données de la base, avec google tu trouves très rapidement du code exploitable.
J'ai par exemple, sur un des premiers d'une recherche VBS Oracle, trouvé ce 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
Dim strConnect
Dim adoConnection
Dim adoRecordset
Dim strSQL
Dim strResults
 
strSQL = "SELECT emplid from ps_employment_c where termination_dt = '12-Mar-07';"
Set adoConnection = CreateObject("ADODB.Connection")
 
strConnect ="Driver={Microsoft ODBC for Oracle}; " & _
         "CONNECTSTRING=(DESCRIPTION=" & _
         "(ADDRESS=(PROTOCOL=TCP)" & _
         "(HOST=192.168.131.155)(PORT=1521))" & _
         "(CONNECT_DATA=(SERVICE_NAME=CSNPRD))); uid=outlook_user;pwd=oraclexx;"
 
adoConnection.Open strConnect
Set adoRecordset = CreateObject("ADODB.Recordset")
adoRecordset.ActiveConnection = adoConnection
adoRecordset.Source = strSQL
adoRecordset.Open
Do Until adoRecordset.EOF
          strResults = adoRecordset.Fields(0).Value
           msgbox strResults
           adoRecordset.MoveNext
Loop
 
adoRecordset.Close   
adoConnection.Close

strSQL contient la requête SQL sur tes tables.
adoRecordset devrait être l'élément qui contient la réponse à ta requête.

MSDN fournis également tout une aide sur ADODB.Connection

Bref je te laisse chercher plus, surtout que je ne pourrais pas t'aider plus sur la partie base de donnée car je n'en utilise pas et je n'ai pas d'expérience dessus.