string - VBScript 解析一行直到遇到标记字符

Question

如何解析一行直到满足标记字符串/字符。

例如。

    <a href="/stamp/stamp.jsp?tp=&number=100001">
..
    <a href="/stamp/stamp.jsp?tp=&number=200001">
..
    <a href="/stamp/stamp.jsp?tp=&number=300001">

这些字符串可以出现在 html 文件的任何部分。我的问题是这样的。

我的开始标记是“/stamp/stamp.jsp?tp=&number=”，结束标记是“””，我应该将这六位变量保存到某个文本文件中。

任何解决方案将不胜感激。

感谢您。

Answer 1

使用 RegExp 很容易：

dim f
dim r
dim item
dim rMatches

' .. .-> read the content of the file into f

set r =  new regexp

r.pattern = "\/stamp\/stamp.jsp\?tp=&number=(\d+)\"""
r.global = true
set rMatches = r.execute(f)

for each item in rMatches
    msgbox item.submatches(0)
next