Jump to content
hcI

[Solved] Func don't return array

Recommended Posts

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 by hcI
Topic solved

Share this post


Link to post
Share on other sites
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?

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

Thanks man !

Share this post


Link to post
Share on other sites

 

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

Share this post


Link to post
Share on other sites

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

Share this post


Link to post
Share on other sites
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

 


This wonderful site allows debugging and testing regular expressions (many flavors available). An absolute must have in your bookmarks.
Another excellent RegExp tutorial. Don't forget downloading your copy of up-to-date pcretest.exe and pcregrep.exe here
RegExp tutorial: enough to get started
PCRE v8.33 regexp documentation latest available release and currently implemented in AutoIt beta.

SQLitespeed is another feature-rich premier SQLite manager (includes import/export). Well worth a try.
SQLite Expert (freeware Personal Edition or payware Pro version) is a very useful SQLite database manager.
An excellent eBook covering almost every aspect of SQLite3: a must-read for anyone doing serious work.
SQL tutorial (covers "generic" SQL, but most of it applies to SQLite as well)
A work-in-progress SQLite3 tutorial. Don't miss other LxyzTHW pages!
SQLite official website with full documentation (may be newer than the SQLite library that comes standard with AutoIt)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

  • Similar Content

    • By Rabu
      I want to use the winsock overlapped/completion routine method of i/o, but how do I get the pointer to my user function.  I know it is possible because when using the old method of windows messages, the user function name was used instead of a pointer.
    • By D2thunder
      Hi all, I wasnt active in this Forum forum for Years. 😅
      Since I need something with Json in AutoIt i write a little UDF to save a variable to file to read it with another language - and back. After a while until my other script grows i thought - lets integrate all variables wich is possible, because i want have arrays to.
      This is my first public UDF in Autoit - normaly my AutoIt scripts are quick an dirty.... - like the examples for this udf. - someone want to write nice examples?
      I tried to write this UDF properly, cared for processing speed, low mem consumption as possible, a short code, and a high usability without beeing very familiar with arrays.
      What is it for? - convert nearly all types of variables to a json string for saving it in a file or to an ini. Read it back in to a same formated variable and preserv variable types. All array types are supported with nested arrays, the only restriction is ram and array/stringsize - and time if the array is very big. You can use Filters for variable types and some other options.
      If anyone found a bug or any suggestions, please post it.
       
      get Json.au3 from here Json.au3
       
       
      JsonVar 2019.01.25.1.zip
    • By PeterVerbeek
      This topic give you access to an AutoIt functions library I maintain which is called PAL, Peter's AutoIt Library. The latest version 1.19 contains 194 functions divided into these topics:
      window and screen mouse and GUI GUI controls logics and mathematics string, xml string and file string dialogues and progress bars data lists: lists, stacks, shift registers and key maps (a.ka. dictionaries) miscellaneous: logging/debugging, process and system info A lot of these functions were created in the development of Peace, Peter's Equalizer APO Configuration Extension, which is a user interface for the system-wide audio driver called Equalizer APO.
    • By Ho3ein
      Hi, i have a source code of "Danny35d" and i have 2 main question that are:
       How to extract this function's results (Datas are as Array) to combo-box without set number of datas?  When i type 1, 2 in _SystemUsers($AccountType = 0) to get only Local or Domain users, it just give me both of them, it's old problem of this function, please share us debugged code :)❤ #include <Array.au3> $Users = _ArrayToString(_SystemUsers(), "|", 1) ConsoleWrite($Users & @CRLF) #cs =============================================================================== Function: _SystemUsers($AccountType = 0) Description: Return an array with the local or domain username Parameter(s): $AccountType: Local, domain or both username 0 = Local and Domain usernames 1 = Local usernames only 2 = Domain usernames only Returns: An array with the list of usernames - Succeeded @error 1 - Didn't query any username @error 2 - Failed to create Win32_SystemUsers object @error 3 - Invalid $AccountType Author(s): Danny35d #ce =============================================================================== Func _SystemUsers($AccountType = 0) Local $aSystemUsers Local $wbemFlagReturnImmediately = 0x10, $wbemFlagForwardOnly = 0x20 Local $colItems = "", $strComputer = "localhost" If Not StringRegExp($AccountType, '[012]') Then Return SetError(3, 3, '') $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2") $colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_SystemUsers", "WQL", _ $wbemFlagReturnImmediately + $wbemFlagForwardOnly) If IsObj($colItems) Then For $objItem In $colItems $Output = StringSplit($objItem.PartComponent, ',') If IsArray($Output) Then $Temp = StringReplace(StringTrimLeft($Output[2], StringInStr($Output[2], '=', 0, -1)), '"', '') If $AccountType = 0 Or ($AccountType = 1 And @ComputerName = $Temp) Then $aSystemUsers &= StringReplace(StringTrimLeft($Output[1], StringInStr($Output[1], '=', 0, -1)), '"', '') & '|' ElseIf $AccountType = 2 And @ComputerName <> $Temp Then $aSystemUsers &= StringReplace(StringTrimLeft($Output[1], StringInStr($Output[1], '=', 0, -1)), '"', '') & '|' EndIf EndIf Next $aSystemUsers = StringTrimRight($aSystemUsers, 1) If $aSystemUsers = '' Then Return(SetError(1, 1, $aSystemUsers)) Return(SetError(0, 0, StringSplit($aSystemUsers, '|'))) Else $aSystemUsers = '' Return(SetError(2, 2, $aSystemUsers)) EndIf EndFunc ;==>_SystemUsers Thanks to your best Team.
    • By sksbir
      Hi
      Trying this from autoit v3.3.14.5 and SCITE 3.19.102.1901.0 :
      help file , page "Language Reference - Variables" , sample autoit script about maps:

      Maps must be declared before use by defining their scope using the 'Global/Local/Static' keywords. Local $mControls[]
      So is my test script : only with this local declation.
      -check syntax is OK
      - running script : 

      test.au3" (13) : ==> Variable subscript badly formatted.: Local $mControls[] Local $mControls[^ ERROR ->14:51:49 AutoIt3.exe ended.rc:1
      any clue ?
×
×
  • Create New...