cant figure out why my list isn't saving

[Arclite86]

expandcollapse popup

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <String.au3>

#include <MsgBoxConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#include <FF V0.6.0.1b-14.au3>

#include <staticConstants.au3>
#include <IE.au3>
#include <String.au3>
#include <Excel.au3>
#include <Array.au3>
#include <FileConstants.au3>


#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1_1_1_1 = GUICreate("program", 1161, 578, 239, 113)
$List2 = GUICtrlCreateList("", 664, 24, 225, 487)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

;list2
Global $iIndex = 0, $sListData12 = "C:\Users\user\Desktop\autoit\lijsten\list2.txt"
Global $sListFile12 = "C:\Users\user\Desktop\autoit\lijsten\list2.txt"

If FileExists($sListFile12) Then
    $sListData12 = StringReplace(FileRead($sListFile12), @CRLF, "|")
EndIf
GUICtrlSetData($List2, $sListData12)
_GUICtrlListBox_SetCurSel($List2, $iIndex)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
             $iListCount2 = _GUICtrlListBox_GetCount($List2)

            ; Loop through the entries
            For $i = 0 To $iListCount2 - 1
                ; And add the text
               $sListData12 &= _GUICtrlListBox_GetText($List2, $i) & "|"
            Next
            ; Strip the final "|"
            $sListData1 = StringTrimRight($sListData12, 1)
            ; And save the result
            $hFile = FileOpen($sListData12, $FO_OVERWRITE)
            FileWrite($hFile, $sListData12)
            FileClose($hFile)
            Exit
            
                    EndSwitch
WEnd

 

[JohnOne]

Works great for me with list2.txt.

[Arclite86]

it does open the   "C:\Users\user\Desktop\autoit\lijsten\list2.txt" and puts al the names in the list but i also have a function dat add a new string ( a new name to the list)  and every time i close(and save) it doesn open the new strings that i added before

so there is something worng with the save fucntion

$iListCount2 = _GUICtrlListBox_GetCount($List2)

            ; Loop through the entries
            For $i = 0 To $iListCount2 - 1
                ; And add the text
               $sListData12 &= _GUICtrlListBox_GetText($List2, $i) & "|"
            Next
            ; Strip the final "|"
            $sListData1 = StringTrimRight($sListData12, 1)
            ; And save the result
            $hFile = FileOpen($sListData12, $FO_OVERWRITE)
            FileWrite($hFile, $sListData12)
            FileClose($hFile)

 

[Jos]

Shouldn't that be:

$hFile = FileOpen($sListFile12, $FO_OVERWRITE)

Jos

[Arclite86]

thank you jos your a freaking hero! :-)