Page 1 sur 1

[R] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 18:31
par networe
Bonjour,

J'aimerai racourcir ceci :

If StringInStr($list[$s][0],"www.google.ca") Then
$lientrue = 1
EndIf
If StringInStr($list[$s][0],"www.google.com") Then
$lientrue = 1
EndIf
If StringInStr($list[$s][0],"www.google.fr") Then
$lientrue = 1
EndIf

J'aimerai pouvoir remplacer ces 3 lignes (Qui pourront facilement devenir 500 lignes..) par une seule.
Chaque lien sera écrit dans un fichier .ini exemple

http://www.google.ca
http://www.google.com
http://www.google.fr

Ca porurait ressembler à un truc du genre
If StringInStr($list[$s][0],"IniRead("monfichier.ini")") Then
$lientrue = 1
EndIf

Merci d'avance :)

Re: [..] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 19:18
par jbnh
J'ai pas testé mais vla un exemple :

Code : Tout sélectionner

For $i = 1 to 3 Step 1
    $var = IniRead("myfile.ini", "site", "Key"&$i, "NotFound")
    If StringInStr($list[$s][0],$var) Then
    $lientrue = 1
    EndIf
Next
ini :

[site]
Key1=www.google.ca
Key2=www.google.com
Key3=www.google.fr

Re: [..] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 19:44
par networe
Merci cela marche très bien

J'aimerai simplement ne pas avoir à modifier

For $i = 1 to 3

Si j'ajoute 5 sites je devrai donc changer For $i = 1 to 8

Re: [..] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 19:57
par Jerome
Vous devriez chercher du côté de :

Code : Tout sélectionner

; fonction qui calcule le nombre de ligne contenu dans un fichier
Global $NumberoftLines = _FileCountLines($Fichier)
 
$Fichier étant votre fichier ini.

Re: [..] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 20:10
par jbnh
@networe : oui la boucle doit aller de 1 à nombre max de test.

N'oublie pas de mettre [R] si pb résolu

Re: [..] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 20:15
par networe
Merci Jérome et jbnh

Re: [R] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 22:09
par Tlem
@networe
33 messages et vous ne savez toujours pas utiliser les balises de code !!!

--> Merci de rajouter les balises de code dans vos messages.

Re: [R] Aller chercher info dans un fichier INI

Posté : ven. 23 juil. 2010 22:26
par davidc
Bonsoir,

Sinon tu peut aussi rajouter dans ton fichier ini le nombre de sites.
[SITE]

NB_SITE = 3
SITE1= ....
SITE2= ....
SITE3= .....

le code devient alors:

Code : Tout sélectionner

$nbSite = IniRead("myfile.ini", "SITE", "NB_SITE", "NotFound")

For $i = 1 to $nbSite Step 1
    $var = IniRead("myfile.ini", "SITE", "SITE"&$i, "NotFound")
    If StringInStr($list[$s][0],$var) Then
    $lientrue = 1
    EndIf
Next