Help on StringRegExp()

[Syed23]

Hi All,

i have a string which contains (HP EliteBook 1234) i want to read that numeric values alone. if i am not wrong we can use stringregexp to read that number values. but i am failing to use the exact expression. can some one help me?

Note:

here i have given example string which have the numeric value in the end. but there were situations where the numeric values will come in the middle.

[GPinzone]

Something like this:

$array = StringRegExp('HP EliteBook 1234', '[0-9]*', 1)

[Syed23]

Something like this:

$array = StringRegExp('HP EliteBook 1234', '[0-9]*', 1)

Thanks for your quick reply. i tried the above one but it does not return any value. just returns blank

[GPinzone]

StringRegExp returns an array of values (in case there is more than one match). If there's only one possible match, then you would need to check $array[0].

[guinness]

How about StringRegExpReplace?

ConsoleWrite(StringRegExpReplace('HP EliteBook 1234', '[^0-9]', '') & @CRLF)

[GPinzone]

For some reason, using "*" doesn't return anything. I guess since it can match zero instances, it returns nothing. Use a + instead.

$array = StringRegExp("HP EliteBook 1234", "[0-9]+", 1)
MsgBox(0, "Answer", $array[0])

[guinness]

Local $aArray = StringRegExp("HP EliteBook 1234", "[0-9]+", 3)
If Not @error Then
    MsgBox(0, "Answer", $aArray[0])
EndIf

See above though as I did it differently.

[Syed23]

Both are working perfect and works i expected Thanks a lot guys!

[Syed23]

i tested in couple of available models and some models returns the value like 'HP EliteBook 1234P" and some machine returns as "'HP compaq DC1234". in this case i also need to read the characters next to numbers or before. is that possible? how can we do that ?

[JohnQSmith]

How about using StringSplit with spaces as delimiters and then grabbing the last array element?

[BrewManNH]

You could use

$Text = StringMid('HP EliteBook 1234P', StringInStr('HP EliteBook 1234P', " ", 0, -1) + 1) ; <<<< Returns everything after the last space character

[guinness]

Ah, OK. I only took the information that was presented to me. Sorry.

[JohnQSmith]

Ah, OK. I only took the information that was presented to me. Sorry.

Don't be sorry; you did just what was asked. It's just that after you shot your arrow, they moved the target.

Edit: Woohoo! 100th post.

Edited April 3, 2012 by JohnQSmith

[Syed23]

you people are helping me here so please do not say sorry. i am glad that lot of people here to help me out. Just now i completed the task. i changed the logic to get the details from database instead of using stringregexp().

Anyways Thanks a lot guys!!!!

Edited April 3, 2012 by Syed23

[GPinzone]

Actually, you could have still used a regex:

$array = StringRegExp("HP EliteBook 1234P", "[a-zA-Z]*[0-9]+[a-zA-Z]*", 1)
MsgBox(0, "Answer", $array[0])

Edited April 3, 2012 by GPinzone

[UEZ]

Try this:

$string1 = "HP EliteBook 1234P"
$aRegEx = StringRegExp($string1, "d+w+", 3)
MsgBox(0, "Test", $string1 & " -> " & $aRegEx[0])

$string2 = "HP 1234P EliteBook"
$aRegEx = StringRegExp($string2, "d+w+", 3)
MsgBox(0, "Test", $string2 & " -> " & $aRegEx[0])

$string3 = "HP 1234P EliteBook"
$sRegEx = StringRegExpReplace($string3, "(.*)s(d+w+)(.*)",  "$2")
MsgBox(0, "Test", $string3 & " -> " & $sRegEx)

$string4 = "HP EliteBook 1234P"
$sRegEx = StringRegExpReplace($string4, "(.*)s(d+w+)(.*)",  "$2")
MsgBox(0, "Test", $string4 & " -> " & $sRegEx)

$string5 = "HP EliteBook 1234"
$sRegEx = StringRegExpReplace($string5, "(.*)s(d+w+)(.*)",  "$2")
MsgBox(0, "Test", $string5 & " -> " & $sRegEx)

Br,

UEZ

Edited April 3, 2012 by UEZ

[Syed23]

Try this:

$string1 = "HP EliteBook 1234P"
$aRegEx = StringRegExp($string1, "d+w+", 3)
MsgBox(0, "Test", $string1 & " -> " & $aRegEx[0])

$string2 = "HP 1234P EliteBook"
$aRegEx = StringRegExp($string2, "d+w+", 3)
MsgBox(0, "Test", $string2 & " -> " & $aRegEx[0])

$string3 = "HP 1234P EliteBook"
$sRegEx = StringRegExpReplace($string3, "(.*)s(d+w+)(.*)",  "$2")
MsgBox(0, "Test", $string3 & " -> " & $sRegEx)

$string4 = "HP EliteBook 1234P"
$sRegEx = StringRegExpReplace($string4, "(.*)s(d+w+)(.*)",  "$2")
MsgBox(0, "Test", $string4 & " -> " & $sRegEx)

$string5 = "HP EliteBook 1234"
$sRegEx = StringRegExpReplace($string5, "(.*)s(d+w+)(.*)",  "$2")
MsgBox(0, "Test", $string5 & " -> " & $sRegEx)

Br,

UEZ

This is really awesome!!!

may i ask one this? what does the value 3 and $2 means ?

[guinness]

If you look at StringRegExp you'll notice that 3 means 'return an array of global matches' and the $2 or 2 is for StringRegExpReplace which means 'display the 2nd group' or in this example it's the 2nd (.*). Though I wouldn't call myself a SRE guru.

[apoorman1986]

may i ?

Local $s=""
$str="HP EliteBook 1234"&@CRLF _
     &"HP EliteBook 1234P"&@CRLF _
  &"HP compaq DC1234"
$strarray=StringRegExp($str,"(w*d{4}w*)",3)
For $i=0 To UBound($strarray)-1
$s&=$strarray[$i]&@CRLF
Next
MsgBox(0,"",$s)

Edited April 4, 2012 by apoorman1986

[JohnQSmith]

may i ?

$strarray=StringRegExp($str,"(w*d{4}w*)",3)

Doesn't work for models such as Compaq CQ62z. Best bet would be grabbing the last alphanumeric character group of the string.

edit: removed pasted text formatting

Edited April 4, 2012 by JohnQSmith