Array Display and Search

[anixon]

I have a text file as per the following example which I want to read into a array display and search routine.

The following code as written does not work as it fails to read the data assigned to $string.

CODE

#include <File.au3>

#include <String.au3>

#include <Array.au3>

;Single line contents of data.txt

;

;"Anyone","123","anyone@anywhere.org","65432","99","112"

Global $string = @ScriptDir & "\data.txt"

Local $avArray[1][6] = [[$string]]

_ArrayDisplay($avArray, "$avArray")

$sSearch = InputBox("_ArraySearch() demo", "String to find?")

If @error Then Exit

$sColumn = InputBox("_ArraySearch() demo", "Column to search?")

If @error Then Exit

$sColumn = Int($sColumn)

$iIndex = _ArraySearch($avArray, $sSearch, 0, 0, 0, 1, $sColumn)

If @error Then

MsgBox(0, "Not Found", '"' & $sSearch & '" was not found on column ' & $sColumn & '.')

Else

MsgBox(0, "Found", '"' & $sSearch & '" was found in the array at position ' & $iIndex & ' on column ' & $sColumn & '.')

EndIf

Assistance is always appreciated. Ant..

Edited February 16, 2009 by anixon

[Authenticity]

Assigning a path to a variable doesn't open the file.

First read the whole file using FileRead of _FileReadToArray and then parse the file. Also, you don't need to declare an array variable. Just declare a regular variable and the function will assign an array to it.

[martin]

I have a text file as per the following example which I want to read into a array display and search routine.

The following code as written does not work as it fails to read the data assigned to $string.

CODE

#include <File.au3>

#include <String.au3>

#include <Array.au3>

;Single line contents of data.txt

;

;"Anyone","123","anyone@anywhere.org","65432","99","112"

Global $string = @ScriptDir & "\data.txt"

Local $avArray[1][6] = [[$string]]

_ArrayDisplay($avArray, "$avArray")

$sSearch = InputBox("_ArraySearch() demo", "String to find?")

If @error Then Exit

$sColumn = InputBox("_ArraySearch() demo", "Column to search?")

If @error Then Exit

$sColumn = Int($sColumn)

$iIndex = _ArraySearch($avArray, $sSearch, 0, 0, 0, 1, $sColumn)

If @error Then

MsgBox(0, "Not Found", '"' & $sSearch & '" was not found on column ' & $sColumn & '.')

Else

MsgBox(0, "Found", '"' & $sSearch & '" was found in the array at position ' & $iIndex & ' on column ' & $sColumn & '.')

EndIf

Assistance is always appreciated. Ant..

Perhaps you are forgetting that indexes start at 0.

#include <File.au3>
#include <String.au3>
#include <Array.au3>

;Single line contents of data.txt
;
;"Anyone","123","anyone@anywhere.org","65432","99","112"

;Global $string = @ScriptDir & "\data.txt"
Local $avArray[6] = ["one1","two2","three3","four4","five5","six6"];[[$string]]
_ArrayDisplay($avArray, "$avArray")

$sSearch = InputBox("_ArraySearch() demo", "String to find?")
If @error Then Exit

$sColumn = InputBox("_ArraySearch() demo", "Column to search?")
If @error Then Exit
$sColumn = Int($sColumn)

$iIndex = _ArraySearch($avArray, $sSearch, 0, 0, 0, 1, $sColumn-1) + 1
If @error Then
MsgBox(0, "Not Found", '"' & $sSearch & '" was not found on column ' & $sColumn & '.')
Else
MsgBox(0, "Found", '"' & $sSearch & '" was found in the array at position ' & $iIndex & ' on column ' & $sColumn & '.')
EndIf

[anixon]

Assigning a path to a variable doesn't open the file.

First read the whole file using FileRead of _FileReadToArray and then parse the file. Also, you don't need to declare an array variable. Just declare a regular variable and the function will assign an array to it.

I must be a bit dim today cause I have been unable to make it work. If it is not to much trouble can you give me an example using my data file and code? Ant..

[anixon]

Perhaps you are forgetting that indexes start at 0.

#include <File.au3>
#include <String.au3>
#include <Array.au3>

;Single line contents of data.txt
;
;"Anyone","123","anyone@anywhere.org","65432","99","112"

;Global $string = @ScriptDir & "\data.txt"
Local $avArray[6] = ["one1","two2","three3","four4","five5","six6"];[[$string]]
_ArrayDisplay($avArray, "$avArray")

$sSearch = InputBox("_ArraySearch() demo", "String to find?")
If @error Then Exit

$sColumn = InputBox("_ArraySearch() demo", "Column to search?")
If @error Then Exit
$sColumn = Int($sColumn)

$iIndex = _ArraySearch($avArray, $sSearch, 0, 0, 0, 1, $sColumn-1) + 1
If @error Then
MsgBox(0, "Not Found", '"' & $sSearch & '" was not found on column ' & $sColumn & '.')
Else
MsgBox(0, "Found", '"' & $sSearch & '" was found in the array at position ' & $iIndex & ' on column ' & $sColumn & '.')
EndIf

Thanks for the response however the value of Row[1] in Column [0] should be Anyone [data in the data.txt file] then Row[2] in Column[0] would be 123 Ant..