<!-- URL that generated this code: >
<!-- http://txt2re.com/index-vbscript.php3?s=42%2043&2&13&-3 >

<%@ LANGUAGE="VBSCRIPT" %>
<%
  Dim txt
  txt ="42 43"

  Dim re1
  re1 ="(.)"	'Any Single Character 1
  Dim re2
  re2 ="(2)"	'Day 1
  Dim re3
  re3 =".*?"	'Non-greedy match on filler
  Dim re4
  re4 ="(\d+)"	'Integer Number 1

  Dim r
  Set r = New RegExp
  r.Pattern = re1+re2+re3+re4
  r.IgnoreCase = True
  Dim m
  Set m = r.Execute(txt)
  If m.Item(0).SubMatches.Count > 0 Then
      Dim c1
      c1=m.Item(0).SubMatches.Item(0)
      Dim day1
      day1=m.Item(0).SubMatches.Item(1)
      Dim int1
      int1=m.Item(0).SubMatches.Item(2)
      Response.Write("("+Replace(c1,"<","&lt;")+")"+"("+Replace(day1,"<","&lt;")+")"+"("+Replace(int1,"<","&lt;")+")"+"")
  End If
%>

<!------->
<!-- To run this code:-->
<!------->
<!-- .Paste into text file using notepad into IIS Web Server wwwroot directory.-->
<!------->
<!-- .Or if using Microsoft's development environment use 'paste as html' if available.-->
<!------->