[R] _INetGetSource ne cohabite pas avec IniRead quoi faire

[ELGAMALI]

Pour trouver une solution simple et logique à mon problème, j’estime qu’il serait préférable de le traiter en se basant sur l’exemple du code ci-dessous.
Malheureusement la fonction « _INetGetSource » ne permet pas à la fonction « IniRead » de répondre à « msgbox(0," retour ", $v1 & $v2 & $v3 & $v4 & $v5 & $v6& $v7) » par contre « MsgBox(0, "Fichier:", $file) » répond très bien .
Quoi faire pour que msgbox(0," retour ", $v1 & $v2 & $v3 & $v4 & $v5 & $v6& $v7) » soit lui aussi fonctionnel.

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#Include <Inet.au3>

Local $sSource, $sUrl,$file,$fichier
global $v1,$v2,$v3,$v4,$v5,$v6  
    
$search  = "http://XXX.com/GestionCients/BoxInfoClients/fichier.ini"
$file = _INetGetSource($search)
MsgBox(0, "Fichier:", $file)
INIINFO($fichier)

msgbox(0," retour   ", $v1 &  $v2 & $v3 & $v4 & $v5 & $v6 $v7)

FUNC INIINFO($fichier)
 $v1 = IniRead($fichier, "parametres", " Nom ", "NotFound")
 $v2 = IniRead($fichier, "parametres", " Préom ", "NotFound")
 $v3 = IniRead($fichier, "parametres", "Taille du média", "NotFound")
 $v4 = IniRead($fichier, "parametres", " Mot de Passe ", "NotFound")
 $v5 = IniRead($fichier, "parametres", " Indicatif ", "NotFound")
 $v6 = IniRead($fichier, "parametres", " Pays/Région ", "NotFound")
  $v7 = IniRead($fichier, "parametres", " Ville ", "NotFound")
EndFunc

;***************
;Fichier.ini 

;[parametres]
;Nom=MESONAVE
;Préom=Bruno
;Mot de Passe=123
;Indicatif= 333
;Téléphone/Mobile=1234567890
;Pays/Région=FRANCE
;Ville=Paris
 

[overflow]

Enregistre ton fichier sur ton disque dure si tu veut te servire d iniread


Edit :
Pas tester mais regarde cette modif ca devrais aiguiller

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#Include <Inet.au3>

Local $sSource, $sUrl,$file,$fichier
global $v1,$v2,$v3,$v4,$v5,$v6 
   
$search  = "http://XXX.com/GestionCients/BoxInfoClients/fichier.ini"
InetGet($search, @ScriptDir & "\fichier.ini")
$fichier=@ScriptDir & "\fichier.ini"
;$file = _INetGetSource($search)
;MsgBox(0, "Fichier:", $file)
INIINFO($fichier)

msgbox(0," retour   ", $v1 &  $v2 & $v3 & $v4 & $v5 & $v6 $v7)

FUNC INIINFO($fichier)
 $v1 = IniRead($fichier, "parametres", " Nom ", "NotFound")
 $v2 = IniRead($fichier, "parametres", " Préom ", "NotFound")
 $v3 = IniRead($fichier, "parametres", "Taille du média", "NotFound")
 $v4 = IniRead($fichier, "parametres", " Mot de Passe ", "NotFound")
 $v5 = IniRead($fichier, "parametres", " Indicatif ", "NotFound")
 $v6 = IniRead($fichier, "parametres", " Pays/Région ", "NotFound")
  $v7 = IniRead($fichier, "parametres", " Ville ", "NotFound")
EndFunc
 

[matwachich]

Pourquoi faire simple quand on peut faire compliqué!

► Afficher le texte

Code : Tout sélectionner

Global $v1, $v2, $v3, $v4, $v5, $v6, $v7
Global $fichier = "temp.ini"
INetGet($url, $fichier)
ININFO($fichier)
MsgBox(0,"retour", $v1 & @CRLF & $v2 & @CRLF & $v3 & @CRLF & $v4 & @CRLF & $v5 & @CRLF & $v6 & @CRLF & $v7)

[ELGAMALI]

Bonjour à tous
La solution que je cherche est de ne pas copier le fichier .ini sur le disque (Temp), car on a pas le droit de le déplacer (instruction formelle).

[matwachich]

Alors, voila ce qu'il faut

[ELGAMALI]

C'est pas évident matwachich.

[mikell]

Et la 1ère solution de matwachich avec InetRead au lieu de InetGet, avec pour la fonction INIINFO une analyse de texte au lieu des IniRead ?

[matwachich]

C'est ça mikell, mais je n'allai pas mâcher le travail non plus! Je ne suis pas trop d'humeur aujourd'hui.
INetRead + Les fonction _IniString_ feront parfaitement l'affaire.

[mikell]

Je pensais plutôt, pour un ini de type

Code : Tout sélectionner

[parametres]
Nom=mikell
Prénom=chat
Taille du média=12,5
Mot de Passe=ta#gada
Indicatif=04
Pays/Région=France
Ville=Cactus /sur béton

à qqe chose du genre (pas sûr de la syntaxe)

Code : Tout sélectionner

#include <Array.au3>
$txt = FileRead(@ScriptDir & "\ini.ini")   ; ou BinaryToString(InetRead(....))
$items = StringRegExp($txt, '=([\S|\h]+)', 3)
_ArrayDisplay($items)

[matwachich]

Oui, mais au lieux de se casser la tête à refaire ces pattern, il suffit d'utiliser l'UDF dont j'ai donné le lien!

[ELGAMALI]

Salut matwachich
Fait nous se script
Merci

[matwachich]

Voila

[ELGAMALI]

Bonjour matwachich Bravo Bravo Bravooooooooooooooooooooooooooo
voilà une application à la hauteur de AUTOIT
Au nom des amis de se forum je vous remercie