[Solved] Func don't return array

[hcI]

Hello, i'm making a little script that lets users enter a question and if the script can't answer to, it ask what would be the answer (a bit like siri on IPhones). And I try to display the "supposed array" I still have an error.. I searched on Google and got nothing looked in the help file too.. I'm here to know if someone have a solution to my error please.

Here is where $a and $b should become arrays :

Dim $dossier  = @AppDataDir & "\Siri2"
Dim $chemin = $dossier & "\data.ini"
Global $a = _InfoRead($chemin, 0)
Global $b = _InfoRead($chemin, 1)

with this function :

Func _InfoRead($path, $mode = 0)
    If DirGetSize($dossier) = -1 Then Return SetError(-4)
    If Not FileExists($chemin) Then Return SetError(-5)
    Local $readed = IniReadSection($path, "data")
    If @error Then Return SetError(-3)
    $size = $readed[0][0]
    Local $return[$size]
    For $i = 1 To $size Step 1
        $return[$i - 1] = $readed[$i][$mode]
    Next
    Return $return
EndFunc

and the thing that i don't understand is that, after _InfoRead return affected to $a, I can't use _ArrayDisplay because of  error 1 "$aArray is not an array" (and same fpr the variable $b)..

Can please someone help me to understand why is it doing this ?

-hcI

Edited June 13, 2017 by hcI
Topic solved

[anthonyjr2]

When you call Return SetError(-4) or SetError(-5) you are returning an errorcode, not an array. If you check the return value of $a or $b is it returning an error?

[hcI]

16 minutes ago, anthonyjr2 said:

When you call Return SetError(-4) or SetError(-5) you are returning an errorcode, not an array. If you check the return value of $a or $b is it returning an error?

Yes you're right, it was returning an error because there was nothing in the data.ini ! I feel stupid now .

Thanks man !

[Valuater]

Since you are using an ini file

Dim $chemin = $dossier & "\data.ini"

Why not use iniread /inireadsection /etc..

8)

[hcI]

 

Func _InfoRead($path, $mode = 0)
    If DirGetSize($dossier) = -1 Then Return SetError(-4)
    If Not FileExists($chemin) Then Return SetError(-5)
    Local $readed = IniReadSection($path, "data")
    If @error Then Return SetError(-3)
    $size = $readed[0][0]
    Local $return[$size]
    For $i = 1 To $size Step 1
        $return[$i - 1] = $readed[$i][$mode]
    Next
    Return $return
EndFunc

As you can see in the function, i am using IniReadSection.

-hcI

[hcI]

And there is 1hour ago, it was working but now when my script try to match the user's question to one that he knows, i get an error :

For $i = 0 To Ubound($a, 1) Step 1
    If $question = $a[$i] Then ; If the user's question match to one that he knows
        MsgBox(0, "Syrie II", $b[$i]) ; We answer it
        $IsDone = True ; We answered the question so we put it to True
        ExitLoop(1) ; And we break the search loop
    EndIf
Next

Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
If $question = $a[$i] Then
If $question = ^ ERROR

Was the same error than last time but now i can _ArrayDisplay $a and i get no errors with _InfoRead function

PS: $question is the user's question in lower case and $b the answer array

-hcI

[jchd]

9 minutes ago, hcI said:

For $i = 0 To Ubound($a, 1) Step 1

Fix with:

For $i = 0 To Ubound($a) - 1

as AutoIt arrays' indices are 0..Ubound($a)-1

 

[hcI]

Thanks you ! I often forget this rule

-hcI