[R] Probleme d'array malgre une sécurité

[Iste]

Salutations,

Dans un de mes script, j'ai une fonction qui raconte cela

Code : Tout sélectionner

Local $RSS_items = HTTPRequest("GET", $RSS_URL)
If $RSS_items = "" Then SetError(1, 0, 0)
$RSS_items = _StringBetween($RSS_items, "<item>", "</item>")
If Not IsArray($RSS_items) = 0 Then SetError(1, 0, 0)
Local $RSS_articles[UBound($RSS_items)][5]

Seulement, il m'arrive d'avoir cette erreur a la derniere ligne

==> Array variable subscript badly formatted.:
Local $RSS_articles[UBound($RSS_items)][5]
Local $RSS_articles[^ ERROR

Ce que je ne comprend pas :/
J'ai pourtant évité tout probleme avec la condition d'avant non ?

[orax]

SetError(1, 0, 0) va seulement mettre à la valeur "1" la macro @error, et ensuite le script continu.
On peut mettre par exemple : If Not IsArray($RSS_items) = 0 Then Return SetError(1, 0, 0) pour sortir de la fonction tout en mettant @erreur à "1".

[Tlem]

Sinon pour être clair :

Code : Tout sélectionner

If IsArray($RSS_items) Then
   Local $RSS_articles[UBound($RSS_items)][5]
Else
   Return SetError(1, 0, 0)
EndIf

Mais bon, la solution d'orax est plus rapide.

[Iste]

haaa ok, je pensais qu'il parlait de return de la fonction user, pas de la fonction seterror() ^^'
Merci bien !

Sinon, esque ma condition est vraiment correcte? je suis tenté de changer en

Code : Tout sélectionner

If Not IsArray($RSS_items) = 1 Then

Voir...

Code : Tout sélectionner

If IsArray($RSS_items) = 0 Then

[Tlem]

IsArray vous renvoi 0 ou 1, donc inutile de faire un test supplémentaire.

Un simple If IsArray() suffit pour tester la condition vraie.
Sinon If Not IsArray() testera la condition fausse.
A vous de voir comment vous voulez utiliser la suite du code.

[Iste]

If Not IsArray($RSS_items) alors ^^ merci bien !
Sujet clos