_FileWriteFromArray-Fehler

meistertogo

Hallo Community,

mithilfe der Funktion

[autoit]

_FileWriteFromArray()

[/autoit]

würde ich gerne ein 2D-Array (5 Spalten, 15 Zeilen) in eine Textdatei schreiben.

Allerdings bricht das Programm mitten in der Funktion ab, sodass ich das

[autoit]

@error

[/autoit]

-Makro gar nicht mehr abfragen kann.

Wäre für Rat, Erfahrungen und Hilfe sehr dankbar.

PS: Die in SciTE angezeigte Abbruchmeldung in der Datei

[autoit]

"File.au3"

[/autoit]

lautet:

Code

####\AutoIt3\Include\File.au3 (256) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
If FileWrite($hFile, $a_Array[$x] & @CRLF) = 0 Then
If FileWrite($hFile, ^ ERROR

4ern

Das heißt, dass deine Array nicht korrekt Dimensioniert ist. Poste doch deinen kompletten Code.

meistertogo

Habe meinen ersten Beitrag entsprechend überarbeitet.

PainTain

Aus der Fehlermeldung kann man sogar den Fehler lesen.
Irgendwo im Forum gibt es ja auch einen Thread, wie man Fehler richtig findet bzw. debugt.

"Array variable has incorrect number of subscripts or subscript dimension range exceeded." - _FileWriteFromArray() unterstützt nur max. 2 Dimensionen.
Laut Hilfe sollte @error gesetzt werden...

Jedenfalls, du wirst dir diese Funktion wohl selber für 5 Dimensionen schreiben müssen, aber das sollte nicht viel Arbeit sein.
Wozu gibst For-Schleifen

**AspirinJunkie**

Zitat von rynow

Poste doch deinen kompletten Code.

Zitat von meistertogo

Habe meinen ersten Beitrag entsprechend überarbeitet.

Nein hast du nicht.

Der Fehler ist so für uns nicht nachvollziehbar und könnte nur durch raten ermittelt werden.
Poste bitte ein Minimalskript (ein ohne Änderung direkt lauffähiges, so klein wie möglich gehaltenes Skript, welches den von dir beschriebenen Fehler reproduziert) damit wir helfen können den Fehler zu finden.

meistertogo

Rynows Beitrag in seiner Urfassung lautete (sinngemäß): "Mit welcher Fehlermeldung bricht er den[n] im Debug ab?"
Durch Editieren wurde daraus erst:

Zitat von rynow

Das heißt, dass deine Array nicht korrekt Dimensioniert ist. Poste doch deinen kompletten Code.

Wie dem auch sei, ein 2D-Array (z. B.

[autoit]

$aArray[10][5]

[/autoit]

) sollte eigentlich geschrieben werden können.
Ein 3D-Array würde wie folgt aussehen:

[autoit]

$aArray[10][5][2]

[/autoit]

.

Hier mein Minimalskript:

Minimalskript

[autoit]

#include-once
#include <Array.au3>
#include <File.au3>

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

Global $aArray[10][5]

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

For $z = 0 To 4
For $i = 0 To 9
$aArray[$i][$z] = Random(0, 10, 1)
Next
Next

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

_ArrayDisplay($aArray)

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

$sDatei = FileOpen(@ScriptDir&"\ArrayDatei.txt", 2);der Parameter "2" ist nicht von Bedeutung für das Auftreten der Fehlermeldung
_FileWriteFromArray($sDatei, $aArray);<--
FileClose($sDatei)

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

;Folgendes funktioniert, erzeugt allerdings keine Datei:
;_FileWriteFromArray(@ScriptDir, $aArray)

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

;Folgendes gibt denselben Error aus:
;_FileWriteFromArray(@ScriptDir&"\ArrayDatei.txt", $aArray)

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

Exit

[/autoit]

4ern

Du hast eine Klammer zuviel:

Dein Code:

[autoit]

$sDatei = FileOpen(@ScriptDir&"\ArrayDatei.txt"), 2);der Parameter "2" ist nicht von Bedeutung für das Auftreten der Fehlermeldung

[/autoit]

Richtig:

[autoit]

$sDatei = FileOpen(@ScriptDir&"\ArrayDatei.txt", 2)

[/autoit]

meistertogo

Zitat von rynow

Du hast eine Klammer zuviel:

Jetzt nicht mehr .
War vermutlich beim Testen dazwischengerutscht, dürfte für den Fehler jedoch nicht ausschlaggebend gewesen sein.

**BugFix**

Kann es sein, dass deine AutoIt-Version eeetwaaaas veraltet ist?
Aus deinem Code läßt sich kein Fehler ableiten (auch wenn das Durchlaufen des Arrays mit Spalte als führendem Index mich anfangs verwirrt hat.

In älteren Versionen (allerdings wirklich schon lang her) war dieser Befehl nicht auf 2D-Arrays anwendbar.

4ern

Beim ebenfalls keine Fehler....

meistertogo

Momentan verwende ich (gem. der Hilfedatei) AutoIt-Version "3.3.6.1".

**AspirinJunkie**

Ok sorry - das es vorher anders dastand wusste ich nicht.

Der Code funktioniert bei mir problemlos und erzeugt auch die Datei.
Könnte mir folgendes vorstellen:

Deine AutoIt-Version ist etwas älter
Du schreibst in ein Verzeichnis in welchem du als Nicht-Admin keine Rechte hast (mal mir #RequireAdmin probiert?)

Edit: 3.3.6.1 ist nicht die aktuelle.
In der 3.3.8.0 wurde folgender Bug gefixt:

Code

Fixed #1712: _FileWriteFromArray() crash on array.

Also ruhig mal die neue Version installieren und nochmal probieren.

meistertogo

Meine AutoIt-Version werde ich sicherheitshalber aktualisieren.
Auf das Verzeichnis habe ich vollen Zugriff und alle benötigten Rechte, um Dateien zu erstellen etc.

meistertogo

Funktioniert jetzt (nach erfolgreicher Aktualisierung auf AutoIt-Version 3.3.8.1) problemlos, die Datei wird korrekt erzeugt.

Vielen Dank!

Darauf wäre ich ohne Eure Hilfe vermutlich nicht ohne Weiteres gekommen.

Nochmals vielen Dank!

4ern

Habe mal die Text Datei überprüft. Und es fehlt die 3 und 4 Spalte ??? Ist das bei euch auch so?

meistertogo

Ja, dieses Ergebnis tritt bei mir ebenfalls auf.

**BugFix**

Zitat von rynow

Habe mal die Text Datei überprüft. Und es fehlt die 3 und 4 Spalte ??? Ist das bei euch auch so?

Einfach mal die Hilfe zu _FileWriteFromArray lesen. Da war doch was mit StartIndex..

meistertogo

Habe diesen Hilfe-Artikel jetzt schon gefühlte tausendmal rauf- und runtergelesen.
Werde scheinbar dennoch nicht schlau(er) daraus.

**BugFix**

Sorry, hatte mich verguckt. Default ist ja "0" - ich hatte "1" in Erinnerung. Könnte tatsächlich ein Bug sein, mal die Funktion durchleuchten.

**BugFix**

Na da bin ich ja platt.
Die Funktion (übrigens vom Chef Jos persönlich) ist buggy! In der zweiten Dimension werden immer nur 3 Werte geschrieben. Fehler habe ich gefunden und bereits im BugTracker veröffentlicht.

Hier ein funktionierende und auch deutlich schnellere Version der Funktion:

Spoiler anzeigen

[autoit]

Func _FileWriteFromArray($File, $a_Array, $i_Base = 0, $i_UBound = 0, $s_Delim = "|")
; Check if we have a valid array as input
If Not IsArray($a_Array) Then Return SetError(2, 0, 0)
Local $iDims = UBound($a_Array, 0)
If $iDims > 2 Then Return SetError(4, 0, 0)

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

; determine last entry
Local $last = UBound($a_Array) - 1
If $i_UBound < 1 Or $i_UBound > $last Then $i_UBound = $last
If $i_Base < 0 Or $i_Base > $last Then $i_Base = 0

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

; Open output file for overwrite by default, or use input file handle if passed
Local $hFile
If IsString($File) Then
$hFile = FileOpen($File, $FO_OVERWRITE)
Else
$hFile = $File
EndIf
If $hFile = -1 Then Return SetError(1, 0, 0)

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

; Write array data to file
Local $s_Temp = '', $ErrorSav = 0
Switch $iDims
Case 1
For $x = $i_Base To $i_UBound
$s_Temp &= $a_Array[$x] & @CRLF
Next
If FileWrite($hFile, $s_Temp) = 0 Then $ErrorSav = 3
Case 2
For $x = $i_Base To $i_UBound
$s_Temp &= $a_Array[$x][0]
;~ For $y = 1 To $iDims ; == FAILURE -- we need "Ubound($a_Array, 2) -1" !!
For $y = 1 To Ubound($a_Array, 2) -1
$s_Temp &= $s_Delim & $a_Array[$x][$y]
Next
$s_Temp &= @CRLF
Next
If FileWrite($hFile, $s_Temp) = 0 Then $ErrorSav = 3
EndSwitch

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

; Close file only if specified by a string path
If IsString($File) Then FileClose($hFile)

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

; Return results
If $ErrorSav Then Return SetError($ErrorSav, 0, 0)
Return 1
EndFunc ;==>_FileWriteFromArray

[/autoit]