need help for StringRegExp

[DoctorSLO]

Hi.

Can someone help me to get this in StringRegExp ?

I want to get this time 0:08:30 from this

src="img/un/a/clock.gif" width=18> 0:08:30</TD>

I do this

$Time = StringRegExp('img/un/a/clock.gif" width=18> 0:08:30</TD>', 'img/un/a/clock.gif" width=18> ([0-9]{1,3}):([0-9]{1,2}):([0-9]{1,2})</TD>', 1)
If @error == 0 Then
$hTime = $Time[0]
$mTime = $Time[1]
$sTime = $Time[2]
EndIf

I know that this is incorrect ... please tell me how to do it correctly ...

Thx

EDIT: hTime are hours, mTime are minutes, sTime are sec.

Edited February 5, 2009 by DoctorSLO

[martin]

Hi.

Can someone help me to get this in StringRegExp ?

I want to get this time 0:08:30 from this

src="img/un/a/clock.gif" width=18> 0:08:30</TD>

I do this

$Time = StringRegExp('img/un/a/clock.gif" width=18> 0:08:30</TD>', 'img/un/a/clock.gif" width=18> ([0-9]{1,3}):([0-9]{1,2}):([0-9]{1,2})</TD>', 1)
If @error == 0 Then
$hTime = $Time[0]
$mTime = $Time[1]
$sTime = $Time[2]
EndIf

I know that this is incorrect ... please tell me how to do it correctly ...

Thx

EDIT: hTime are hours, mTime are minutes, sTime are sec.

This should work

$Time = StringRegExp('img/un/a/clock.gif" width=18> 0:08:30</TD>', '[0-9]{1,2}:[0-9]{1,2}:[0-9]{1,2}', 1)
If @error = 0 Then
    For $n = 0 To UBound($Time) - 1
        ConsoleWrite("$TIme[" & $n & "] = " & $Time[$n] & @CRLF)
    Next
EndIf