Dynamisk reo.Pattern

Jeg har denne kode som finder tekst imellem text1 og text2 i en variabel:

reo.Pattern = "(text1)(.*?)(text2)"

Men jeg vil gerne lave den dynamisk så text1 og text2 er variabler.

Her er den komplette kode jeg bruger.

<%
  set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")
  xmlhttp.open "GET", url, false
  xmlhttp.send ""
  sitetext= replace(replace(xmlhttp.responseText ,Chr(10), ""),vbCrLf,"")
  set xmlhttp = nothing
  html=sitetext

  Set reo = New RegExp
  reo.Pattern = "(text1)(.*?)(text2)"
  reo.Global = True
  Set mm = reo.Execute(html)
  For Each m in mm
    result=m.SubMatches(1)
    response.write result&"<br>"
  Next

%>