Page 1 sur 1
[R] Formule exact pour multi lignes FileWriteLine
Posté : mar. 29 déc. 2009 07:36
par Mikaas
Bonjour,
Voila j'aurai aimé faire apparaitre dans MyINI.ini ces lignes :
► Afficher le texte
Code : Tout sélectionner
(Main)
{
Folder=[b][color=#FF0000]"[/color][/b]$RAC_1 \ DOC_2[b][color=#FF0000]"[/color][/b];
Dossier=[b][color=#FF0000]"[/color][/b]TRUE[b][color=#FF0000]"[/color][/b];
};
mes soucis :
- incruster dans les lignes $RAC_1 + $DOC_2 qui est egale à :
► Afficher le texte
Code : Tout sélectionner
$RAC_1 = IniRead(@ScriptDir & "/CONFIG.ini", "SERO", "RACINE_1", 0)
$DOC_2 = IniRead(@ScriptDir & "/CONFIG.ini", "SERO", "DOC_2", 0)
dans mon CONFIG.ini :
- Reproduire les
" " qui sont importantes.
- le TRUE apparait comme une
TRUE quand j'edite mon script alors que je souhaite l'avoir en texte à écrire ( peu etre du aussi au
" " )
Voici se que jai essayé :
► Afficher le texte
Code : Tout sélectionner
HotKeySet("{ESC}", "TERMINER")
HotKeySet("{F1}", "NE1")
Func TERMINER()
Exit 0
EndFunc ;==>TERMINER
$RAC_1 = IniRead(@ScriptDir & "/CONFIG.ini", "SERO", "RACINE_1", 0)
$DOC_2 = IniRead(@ScriptDir & "/CONFIG.ini", "SERO", "DOC_2", 0)
Func NE1()
$FILE = FileOpen("MyINI.ini", 1)
FileWriteLine($FILE, "(Main)")
FileWriteLine($FILE, "{" & @CRLF)
FileWriteLine($FILE, @TAB & "Folder=" & [b][color=#FF0000]"[/color][/b]$RAC_1 & "\" & $DOC_2[b][color=#FF0000]"[/color][/b] ";" & @CRLF)
FileWriteLine($FILE, @TAB & "Dossier=" & [b][color=#FF0000]"[/color][/b] "TRUE" [b][color=#FF0000]"[/color][/b] & ";" & @CRLF)
FileWriteLine($FILE, "};" )
FileClose($FILE)
EndFunc
While 1
Sleep(10)
WEnd
sans succès bien sur
Merci de votre aide car celui ci sera peut etre le dernier de cette année 2009
Ps : Bonne Fêtes à vous !
Re: [..] Formule exact pour multi lignes FileWriteLine
Posté : mar. 29 déc. 2009 08:10
par Tlem
L'utilisation des fonctions de lecture/écriture d'un fichier .ini me semble inappropriée ici.
Initialisez simplement vos variables et écrivez-les.

► Afficher le texte
Code : Tout sélectionner
;Initialisation des variables :
$RAC_1 = "RACINE_1"
$DOC_2 = "DOC_2"
$Dir = "True"
NE1()
Func NE1()
$FILE = FileOpen(@ScriptDir & "\MyINI.ini", 2)
FileWriteLine($FILE, "(Main)" & @CRLF & "{" & @CRLF)
FileWriteLine($FILE, @TAB & 'Folder= "' & $RAC_1 & '\' & $DOC_2 & '" ;' & @CRLF)
FileWriteLine($FILE, @TAB & 'Dossier= "' & $Dir & '" ;' & @CRLF)
FileWriteLine($FILE, "};" )
FileClose($FILE)
EndFunc
Re: [..] Formule exact pour multi lignes FileWriteLine
Posté : mar. 29 déc. 2009 08:32
par Mikaas
Wouaha !
mais tu es trop fort
merci beaucoup 