listview to csv

[Hobbyist]

I have been attempting to learn how to move data from a listview to CSV.

Came up with the below code BEFORE I found guiness's code (function).

Since I need to discover the how's and why's of coding could someone please look at mine and tell me why it returns a blank file??   The listview has "n" rows but only three columns.  Errors are screened at the listview control.  I actual have another similar code in which I used FileWriteLine  along with other coding, so I thought I would try a different approach thus the below one.

I would appreciate it very much.

Thanks.

Local $hFileOpen = FileOpen ("c:\documents\saveT sample" &".CSV",1)
local $savecount = _GUICtrlListView_GetItemCount ( $list1 )
for $i = 0 to $savecount  -1
    for $j = 0 to 2
$temp  = _GUICtrlListView_GetItemText (  $list1, $i,$j)
if $j <2 Then
    $temp = $temp&","
EndIf
Next
MsgBox($MB_SYSTEMMODAL, "Information", $temp )

$temp = $temp& @crlf
 Next

 FILEWRITE($hFileOpen, $temp )
  FileClose ($hFileOpen)

Edited July 24, 2014 by Hobbyist

[BrewManNH]

You're overwriting the contents of $temp each time you go through the inner loop, and then not writing it until you've finished the outer loop. So the contents of $temp is only going to have the last item from the listview.

Edited July 25, 2014 by BrewManNH

[Hobbyist]

BrewManNH

So then should it really be $temp($i) in order to preserve each value of $temp???? 

I guess I don't see how to chain them together, so I write item(0),item(1),item(2) as a line of record.

Thanks for the quick response.

[BrewManNH]

Here's a corrected version of your script, see the comments to see if that's what you're attempting.

Local $hFileOpen = FileOpen("c:\documents\saveT sample.CSV", 1)
Local $savecount = _GUICtrlListView_GetItemCount($list1)
$temp = "" ; set $temp to an empty string
For $i = 0 To $savecount - 1
    For $j = 0 To 2
        $temp &= _GUICtrlListView_GetItemText($list1, $i, $j) ; add the new text to the end of the $temp string
        If $j < 2 Then
            $temp &= "," ; add a comma to the end of the $temp string if $j < 2
        EndIf
    Next
    MsgBox($MB_SYSTEMMODAL, "Information", $temp) ; display what $temp looks like in the message box
    $temp &= @CRLF ; add a CRLF to the end of the $temp string
Next

FileWrite($hFileOpen, $temp) ; write the contents of the $temp variable to the file
FileClose($hFileOpen)

If this is what you're attempting here's another way of doing it as well, it saves a few lines.

Local $hFileOpen = FileOpen("c:\documents\saveT sample.CSV", 1)
Local $savecount = _GUICtrlListView_GetItemCount($list1)
Global $temp
For $i = 0 To $savecount - 1
    For $j = 0 To 2
        $temp = _GUICtrlListView_GetItemText($list1, $i, $j) ; get the text and put it into $temp, this erases the old $temp contents and adds new content
        If $j < 2 Then
            $temp &= "," ; add a comma to the end of the $temp string if $j < 2
        EndIf
    Next
    MsgBox($MB_SYSTEMMODAL, "Information", $temp) ; display what $temp looks like in the message box
    FileWriteLine($hFileOpen, $temp) ; write $temp to the file, automatically adds CRLF to the end of the written line
Next

FileClose($hFileOpen)

[Hobbyist]

BrewManNH

AW - much more clear to me now.  Thanks for straightening me out.

And your documented comments are beneficial to a noo bee trying to understand the whys/hows

My big take aways are:

1. better understanding of loops (and consequences)

2. now know the power of the operator &=

Thanks