#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Outfile=test_code.exe #AutoIt3Wrapper_UseX64=n #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** IniWrite(@ScriptDir & "\code_test.ini", "code", "valeur", "test ecriture") Sleep(100) If IniRead(@ScriptDir & "\code_test.ini", "code", "valeur", "") = "test ecriture" Then ; on test si on peut ecrire FileDelete(@ScriptDir & "\code_test.ini"); ok on efface le fichier Sleep(100) If FileExists(@ScriptDir & "\code_test.ini") Then ;on test si on peut effacer le fichier MsgBox(0, "Erreur", "Vous n'avez pas les droits d'effacement sur ce dossier " & @ScriptDir, 180) Exit EndIf Else MsgBox(0, "Erreur", "Vous n'avez pas les droits d'écriture sur ce dossier " & @ScriptDir, 180) Exit EndIf FileInstall("C:\pi\forum\test code\code_avant_compilation\code.ini", @ScriptDir & "\code.ini", 1) ; si tout est ok on extrait le fichier code Sleep(100) $code = IniRead(@ScriptDir & "\code.ini", "code", "valeur", ""); lecture du code IniWrite(@ScriptDir & "\code.ini", "code", "valeur", ""); on ecrase aussitot la valeur dans le fichier code.ini FileDelete(@ScriptDir & "\code.ini"); on efface aussitot le fichier code.ini MsgBox(0, "Code", "Valeur =" & $code, 180)