Finde <img src width height> for første billede i tekst

Har med nedenværende funtionen fundet første billede-attribut, src=sti/billednavn.jpg, i en tekst :

'* finder forste forekomst af img-tags i html-kode
'* og vises som thumbnail ud for nyhed
Function Find_imgtag_from_html(str)
'*** Make the regular expr object
Set regEx = New RegExp
regEx.Global = true
regEx.IgnoreCase = true
regEx.pattern = "src=(.*?)\s"

set matches = regEx.execute(str)
   
for each match in matches
tmpstr = tmpstr & "," & mid(match.value,5,len(match.value))
next

'* Fjerne første komma
if len(tmpstr)>0 then tmpstr = mid(tmpstr,2)
   
arr=split(tmpstr,",")

'* streng med src-attrib. og andre hard-coded img-attrib. som udskrives paa ASP-siden

Find_imgtag_from_html = "<img src="&arr(0)&" hspace=""5"" vspace=""5"" alt=""billed"" align=""left"" border=""0"" width=""120"" height=""120"" />"
   
'*** Close object
Set regEx = Nothing

End Function

--------------------------------

Nu vil jeg også gerne finde Width og Height på samme måde, men kan ikke få det til at virke.

Hvad skal tilføjes i reg-exp????