m = Regex.Matcher("<title>(.*?)</title>",page)
Do While m.find
Dim s = m.Group(1)
If (s <> "" AND s<>Null) Then
'Utilities.LogM(0,"Parsing:Adding song:" & s) ' check if more than one is found!!!
If (songs.songs.IndexOf(s) = -1) Then songs.songs.Add(s) ' add the song only if not exist (prevent duplications as much as posisble)
Else
Utilities.LogM (0,"Cant find song, strange should not be possible" & m)
End If
Loop
Return songs