von einem 2D Array eine CSV Datei erstellen

    Hallo zusammen

    Ich möchte mit diesem Beispiel Script eine CSV Datei erstellen
    aber wo kann ich hier die Trennzeichen für eine CSV Datei einfügen ?
    irgendwie klappt das nicht so richtig. Wo liegt meinFehler ?

    [autoit]

    #include <Array.au3>
    #include <file.au3>

    [/autoit][autoit][/autoit][autoit]

    Local $avArray[10][2]

    [/autoit][autoit][/autoit][autoit]

    $sFile = "D:\Programmieren\test.csv"

    [/autoit][autoit][/autoit][autoit]

    $avArray[0][0] = "JPM"
    $avArray[1][0] = "Holger"
    $avArray[2][0] = "Jon"

    [/autoit][autoit][/autoit][autoit]

    $avArray[0][1] = "JPM"
    $avArray[1][1] = "Holger"
    $avArray[2][1] = "Jon"

    [/autoit][autoit][/autoit][autoit]

    ; Write first array to file by string file name
    _FileWriteFromArray($sFile, $avArray [0] & ";" & $avArray [1], 0)

    [/autoit]

    Die CSV Datei soll dann so aussehen

    Ausgabe1;Ausgabe2


    Grüße bitworker

    Einmal editiert, zuletzt von bitworker (1. Juni 2010 um 16:43)

    Hey,
    meinst du so?

    Spoiler anzeigen
    [autoit]

    $sFile = "D:\Programmieren\test.csv"

    [/autoit] [autoit][/autoit] [autoit]

    Local $avArray[10][2] = [["JPM", "JPM"], _
    ["Holger", "Holger"], _
    ["Jon", "Jon"]]

    [/autoit] [autoit][/autoit] [autoit]

    Local $string = ''
    For $i = 0 To UBound($avArray) - 1
    If ($avArray[$i][0] = '') And ($avArray[$i][1] = '') Then ContinueLoop
    $string &= $avArray[$i][0] & ';' & $avArray[$i][1] & @CRLF
    Next
    MsgBox(0, "", $string)
    FileWrite($sFile, $string)

    [/autoit]

    Einmal editiert, zuletzt von anno2008 (1. Juni 2010 um 16:51)