<% s = "Administrativ bistandsloven13226-02-1992Lov om gensidig administrativ bistand i sager om direkte og indirekte skatter mellem stater, der er medlem af Europarådet eller OECD" Set reo = New RegExp reo.Pattern = "(?:<[^>]*>)([^<>]*)(?:]*>)" reo.Global = True Set mm = reo.Execute(s) For Each m in mm Response.Write m.SubMatches(0) & "
" & vbCrLf Next Set mm = Nothing Set reo = Nothing %>