Splitting String to three pieces

[geezery]

I need help splitting my string it to three pieces and to put those in the list element.

I managed to split it on two pieces, but I didn't figure how I can split string to three pieces.

String:

10.6.2007 0:00;192.168.1.1;text in here

Delimiter is ; like in csv.

[poisonkiller]

$var = StringSplit("10.6.2007 0:00;192.168.1.1;text in here", ";")oÝ÷ ÛMú½ªôríj)ì&j|©ç±ªÞ¶«{Mú½ªõ

Edited June 11, 2007 by poisonkiller

[geezery]

Thanks for the tip, but I still can't populate my list. I think that there is something wrong with the For loop.

Func _UpdateList()
                _GUICtrlListClear($TimeList)
    _GUICtrlListClear($IpList)
    _GUICtrlListClear($InfoList)
    Dim $ReadedFile
    _FileReadToArray("IPS.txt",$ReadedFile)
For $i = $ReadedFile[1] to 0 step -1
    $Splitted = StringSplit($ReadedFile[$i],";")
                _GUICtrlListAddItem($Timelist,$Splitted[0])
    _GUICtrlListAddItem($IpList,$Splitted[1])
    _GUICtrlListAddItem($InfoList,$Splitted[2])
    
Next
EndFunc

Edited June 11, 2007 by geezery

[SpookMeister]

Thanks for the tip, but I still can't populate my list. I think that there is something wrong with the For loop.

Func _UpdateList()
                _GUICtrlListClear($TimeList)
    _GUICtrlListClear($IpList)
    _GUICtrlListClear($InfoList)
    Dim $ReadedFile
    _FileReadToArray("IPS.txt",$ReadedFile)
For $i = $ReadedFile[1] to 0 step -1
    $Splitted = StringSplit($ReadedFile[$i],";")
                _GUICtrlListAddItem($Timelist,$Splitted[0])
    _GUICtrlListAddItem($IpList,$Splitted[1])
    _GUICtrlListAddItem($InfoList,$Splitted[2])
    
Next
EndFunc

As a guess, shouldnt that be For $i = $ReadedFile[0] to 0 step -1

[poisonkiller]

As a guess, shouldnt that be For $i = $ReadedFile[0] to 0 step -1

I was thinking more like this:

For $i = $ReadedFile[0] to 1 step -1

[geezery]

I had it just like poisonkiller putted. But when I compile the script and execute it only flashes and closes.

expandcollapse popup

#include <GUIConstants.au3>
#include <GuiList.au3>
#include <GuiListView.au3>
#include <file.au3>
; Change to OnEvent mode
Opt("GUIOnEventMode", 1) 

;Main Gui and it Controls
$MainWindow = GUICreate("date", 1024, 768,50, 10, 0x04CF0000) 
$LabelIP = GUICtrlCreateLabel("IP-Address",205,20)
$LabelInfo = GUICtrlCreateLabel("text",310,20)
$TimeList=GUICtrlCreateList ("" , 100,34,100,700)
$IpList=GUICtrlCreateList ("" , 200,34,100,700)
$InfoList=GUICtrlCreateList ("" , 300,34,700,700)
GUISetState(@SW_SHOW)

;Activate the Window Close Button
GUISetOnEvent($GUI_EVENT_CLOSE, "_Terminate")

;Main Program


;Call Functions.
While 1
;Declare how often functions are reloaded
_UpdateList()
$RefreshDelay = 10000
sleep ($RefreshDelay)
wend

;Functions

Func _UpdateList()
    Dim $IpList, $InfoList, $TimeList
    _GUICtrlListClear($TimeList)
    _GUICtrlListClear($IpList)
    _GUICtrlListClear($InfoList)
    Dim $ReadedFile
    _FileReadToArray("IPS.txt",$ReadedFile)
For $i = $ReadedFile[0] to 1 step -1
    $Splitted = StringSplit($ReadedFile[$i],";")
    _GUICtrlListAddItem($TimeList,$Splitted[0])
    _GUICtrlListAddItem($IpList,$Splitted[0])
    _GUICtrlListAddItem($InfoList,$Splitted[1])
Next
EndFunc

;Close Button
Func _Terminate()
$started = 0
Exit
EndFunc

Edited June 11, 2007 by geezery

[geezery]

What am I missing here?

[poisonkiller]

Try changing this line in _UpdateList() function:

Dim $ReadedFile

to this:

Dim $ReadedFile[_FileCountLines("IPS.txt")+1]

[geezery]

Thanks it works, but I cant find any data on _GUICtrlListAddItem($InfoList,$Splitted[3])

Only [1] = 10.6.2007 0:00

[2] = 192.168.1.1

Where is the text cell?