Get word before and behind ":"

[xdp22]

Hello masters, i really need your help, i tried to made one script, but i can't do it.

So please if someone find time to help me - thank you

What i need? :

I had .txt file, here is example :

accounts.txt - and this look inside like that :

login1:password1
login2:password2
abcdefgh:12345
123323:11212121
blablablabla:1234567
1212122:1212121212
xxx123:milk123

What i need to do with that? i need get $login and $password, $login is word before ":" and $password is word behind ":"

I tried to made this with

$login[$i] = _StringBetween($line, "", ":")
                $password[$i] = _StringBetween($line, ":", "")

But that doesn't work

Sorry for my bad englisch

Peace !

[cembry90]

Hello masters, i really need your help, i tried to made one script, but i can't do it.

So please if someone find time to help me - thank you

What i need? :

I had .txt file, here is example :

accounts.txt - and this look inside like that :

login1:password1
login2:password2
abcdefgh:12345
123323:11212121
blablablabla:1234567
1212122:1212121212
xxx123:milk123

What i need to do with that? i need get $login and $password, $login is word before ":" and $password is word behind ":"

I tried to made this with

$login[$i] = _StringBetween($line, "", ":")
                $password[$i] = _StringBetween($line, ":", "")

But that doesn't work

Sorry for my bad englisch

Peace !

Try using this:

$in = "password:hello"
$out = StringSplit($in, ":")
For $i = 1 To $out[0]
    MsgBox(262144, "", $out[$i], 2)
Next

[MrMitchell]

Sounds....like a job for StringRegExp() ...example on the way

So I forgot I'm not good at these so someone else would have to help refine or replace the entire RegEx but it could be something like this:

#include <Array.au3>

$string = "login1:password1" & @CRLF & "login2:password2" & @CRLF & "abcdefgh:12345" & @CRLF & "123323:11212121"
ConsoleWrite($string)

$aLoginPass = StringRegExp($string, "([^\v\h]*):([^\v\h]*)", 3)
_ArrayDisplay($aLoginPass)

;Even index is the login and the odd index + 1 is the password, _ArrayDisplay helps make sense of it

Edited October 22, 2010 by MrMitchell

[iamtheky]

Didnt say how you need them....

change c:\test.txt to your file name, naturally.

#include <array.au3>
#Include <File.au3>
Dim $array

_FileReadToArray ("C:\test.txt", $array)
;~ _arraydisplay ($array)
_arraydelete ($array , 0)
$string = _ArrayToString ($array, ":")
;~ msgbox (0, '' , $string)
$Barray = stringsplit ($string , ":" , 1)
_arraydelete ($Barray , 0)
;~ _arraydisplay ($Barray)

for $i = 0 to ubound($Barray) - 1
    msgbox (0, '' , "Password for " & $Barray[$i] & " is " & $Barray[$i + 1])
    $i = $i + 1
Next
exit

Edited October 22, 2010 by iamtheky

[xdp22]

Thanks for so much reply, i will test now thank you, if need more help i will msg thanks guys

Edit : "iamtheky" THANK YOU work perfect

Take care

Edited October 22, 2010 by xdp22

[GEOSoft]

$sStr = FileRead("C:\path\somefile.txt")
$aStr = StringRegExp($sStr, "(?m:^|\n)(.+):(.+)(?:\v|$)+", 3)
For $1 = 0 To UBound($aStr) -1 Step 2
    MsgBox(4096, "Result " & $i+1, "UserName : " & $aStr[$i] & @CRLF & "Password: " & $aStr[$i+1])
Next