search in array

[6105]

Hi Guys,

i have it:

#include <File.au3>
#include <Array.au3>
$map = @AppDataDir&"/skype"
$List=_FileListToArray($map, "*", 2)
Global $Array[UBound($List)][2]
For $i = 1 To $List[0]
    $Array[$i][0] = $List[$i]
Next
_ArrayDisplay($Array)

Result:

Col0:

skypelogin
My Skype Received Files
shared_dynco
shared_html
shared_httpfe
anogherskypelogin

how i can to sort this array? to be without "shared_" and "My Skype"

Thank you.

[wakillon]

try this

#include <File.au3>
#include <Array.au3>
$map = @AppDataDir&"/skype"
$List=_FileListToArray($map, "*", 2)
Global $Array[UBound($List)][2]
For $i = 1 To $List[0]
    $Array[$i][0] = StringRegExpReplace ( $List[$i], "(shared_|My Skype )", "" )
Next
_ArrayDisplay($Array)

Edited December 21, 2010 by wakillon

[6105]

wow. its great! thank you!

#include <File.au3>
#include <Array.au3>
$map = @AppDataDir&"/skype"
$List=_FileListToArray($map, "*", 2)
Global $Array[UBound($List)][2]
For $i = 1 To $List[0]
    $Array[$i][0] = StringRegExpReplace ( $List[$i], "(shared_dynco|shared_html|shared_httpfe|My Skype Received Files)", "" )
Next
$slash = _ArrayFindAll($array,"")
For $i = 0 to ubound($slash) - 1
    If $i <> 0 Then
        $slash[$i] = ($slash[$i]) - $i
        Endif
_ArrayDelete ($array , $slash[$i])
 Next
_ArrayDisplay($Array)

[wakillon]

may be

#include <File.au3>
#include <Array.au3>
$map = @AppDataDir&"/skype"
$List=_FileListToArray($map, "*", 2)
Global $Array[UBound($List)][2]
For $i = 1 To $List[0]
    $_String = StringRegExpReplace ( $List[$i], "(shared_dynco|shared_html|shared_httpfe|My Skype Received Files)", "" )
    If $_String <> '' Then $Array[$i][0] = $_String
Next
_ArrayDisplay($Array)

[6105]

Yep, its more nice.. but i don't know how to delete free rows, and also,

can't understand why

MsgBox(0, "_ArrayToString() getting $avArray items 1 to 7", _ArrayToString($Array, @TAB, 1, 7))

don't work

Ohh.. good, now everythink work!! Thank you!!

#include <File.au3>
#include <Array.au3>
$map = @AppDataDir&"/skype"
$List=_FileListToArray($map, "*", 2)
Global $Array[UBound($List)][2]
For $i = 1 To $List[0]
    $Array[$i][0] = StringRegExpReplace ( $List[$i], "(shared_dynco|shared_html|shared_httpfe|My Skype Received Files)", "" )
Next
$slash = _ArrayFindAll($array,"")
For $i = 0 to ubound($slash) - 1
    If $i <> 0 Then
        $slash[$i] = ($slash[$i]) - $i
        Endif
_ArrayDelete ($array , $slash[$i])
 Next
For $i = 0 to $List[0]
MsgBox(0,'',$Array[$i][0])
Next

Edited December 21, 2010 by toader

[wakillon]

Yep, its more nice.. but i don't know how to delete free rows

try

#include <File.au3>
#include <Array.au3>
$map = @AppDataDir&"/skype"
$List=_FileListToArray($map, "*", 2)
Global $Array[UBound($List)][2]
For $i = 1 To $List[0]
    $_String = StringRegExpReplace ( $List[$i], "(shared_dynco|shared_html|shared_httpfe|My Skype Received Files)", "" )
    If $_String <> '' And Not StringIsSpace ( $_String ) Then $Array[$i][0] = $_String
Next
_ArrayDisplay($Array)

[6105]

Now, that don't delete the free rows, but thank you) you helps me.

have a nice night. bye.