Share Pastebin
Guest
Public paste!

Untitled

By: a guest | Oct 10th, 2008 | Syntax: ASP | Size: 0.69 KB | Hits: 420 | Expires: Never
Copy text to clipboard
  1. <%
  2. Set regEx = New RegExp
  3. regEx.Global = True
  4. regEx.IgnoreCase = True
  5. sourcestring = "<span style='font-size: 1.25em;'> and </span>"
  6. regEx.Pattern = "<span style='font-size: 1.25em;'>([\S\s]*?)</span>"
  7. Set Matches = regEx.Execute(sourcestring)
  8.   For z = 0 to Matches.Count-1
  9.     results = results & "Matches(" & z & ") = " & chr(34) & Server.HTMLEncode(Matches(z)) & chr(34) & chr(13)
  10.     For zz = 0 to Matches(z).SubMatches.Count-1
  11.       results = results & "Matches(" & z & ").SubMatches(" & zz & ") = " & chr(34) & Server.HTMLEncode(Matches(z).SubMatches(zz)) & chr(34) & chr(13)
  12.     next
  13.     results=Left(results,Len(results)-1) & chr(13)
  14.   next
  15. Response.Write "<pre>" & results
  16. %>