Problem With Array

[will88]

What it's suppost todo: Read Ini file to find out the length of the array.

Then Declare 0-Length of array, with whatever is in the Settings.ini file

Error:

Global $Descriptions[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
Global $Descriptions[^ERROR

Error: Array variable subscript badly formatted.

Some of the code from my script:

Global $ini = @HomeDrive & "\Settings.ini"
$Arrays = IniRead($ini,"B","User","")
If Not $Arrays = "" Then
    For $i = 0 to $Arrays
        $Read = IniRead($ini,"C","User" & $i,"")
        Global $Descriptions[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
        $Read = IniRead($ini,"D","User" & $i,"")
        Global $Usernames[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
        $Read = IniRead($ini,"E","User" & $i,"")
        Global $Passwords[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
    Next
Else
    Global $Arrays = False
EndIf

Settings file:

[B]
User=0
[C]
User0=7E5999BB74C081B59C55BA5C946AB8399471754F5D62
[D]
User0=7F5A98BD73C680B29D22BA2D9367B938
[E]
User0=7F5D99C674C080B59C50BA5A9413B939

Thanks

Edited May 2, 2009 by will88

[blakel]

Int he help file look at User Defined Functions -> Array Managment ->

_ArrayPush

_ArrayPop

_ArrayAdd

or

look at IniReadSection

[martin]

What it's suppost todo: Read Ini file to find out the length of the array.

Then Declare 0-Length of array, with whatever is in the Settings.ini file

Error:

Global $Descriptions[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
   Global $Descriptions[^ERROR
   
   Error: Array variable subscript badly formatted.

Some of the code from my script:

Global $ini = @HomeDrive & "\Settings.ini"
   $Arrays = IniRead($ini,"B","User","")
   If Not $Arrays = "" Then
       For $i = 0 to $Arrays
           $Read = IniRead($ini,"C","User" & $i,"")
           Global $Descriptions[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
           $Read = IniRead($ini,"D","User" & $i,"")
           Global $Usernames[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
           $Read = IniRead($ini,"E","User" & $i,"")
           Global $Passwords[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
       Next
   Else
       Global $Arrays = False
   EndIf

Settings file:

[B]
   User=0
   [C]
   User0=7E5999BB74C081B59C55BA5C946AB8399471754F5D62
   [D]
   User0=7F5A98BD73C680B29D22BA2D9367B938
   [E]
   User0=7F5D99C674C080B59C50BA5A9413B939

Thanks

You cannot set the element of an array which hasn't been declared, unlike like non-array variables.

I haven't tested this but it might fix your problem-

Global $ini = @HomeDrive & "\Settings.ini"
;we are going to use the value of $Arrays as an integer so cast it as a number (IniRead returns a string)
  Global $Arrays = Number(IniRead($ini,"B","User",""))
  If $Arrays <> 0 Then
;first declare the array with $Arrays elements 
      Global $Descriptions[$Arrays]
      For $i = 0 to $Arrays-1
          $Read = IniRead($ini,"C","User" & $i,"")
          Global $Descriptions[$i] =_StringEncrypt(0,$Read,"Password",$Encrypt_Level)
          $Read = IniRead($ini,"D","User" & $i,"")
          Global $Usernames[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
          $Read = IniRead($ini,"E","User" & $i,"")
          Global $Passwords[$i] = _StringEncrypt(0,$Read,"Password",$Encrypt_Level)
      Next
  Else
       $Arrays = False
  EndIf

Note that if $Arrays is 12 it means you want 12 elements. Arrays have the first element at 0 so your For $i loop must goi from 0 to $Array -1.

Edited May 2, 2009 by martin