html里下拉标记,正则表达式提取HTML下拉标记 - 经典ASP

我正在使用以下经典ASP代码从网页之一提取内容。正则表达式提取HTML下拉标记 - 经典ASP

该网页有一个选择框，我想要做的是显示，只有在效应初探选择框，所以不知道我应该怎么改变这里strPattern = "(.*?)"

HTML下拉代码，我需要访问

1 GAL [$64.99]

5 GAL PAIL [$144.99]

54 GAL DRUM [$2,225.00]

读取页面标题经典ASP代码，我希望它改变，从而显示选择框，因为它是

Dim strURL, objXMLHTTP, objXML, strContents

Dim objRegExp, strHTML, strPattern, colMatches, strTitle

strURL= "http://abc.com/testhtm"

Set objXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP")

'Or if this doesn't work then try :

'Set objXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")

objXMLHTTP.Open "GET", strURL, False

objXMLHTTP.Send

strContents = objXMLHTTP.ResponseText

Set objXMLHTTP = Nothing

Set objRegExp = New RegExp

strPattern = "(.*?)"

objRegExp.Pattern = strPattern

objRegExp.IgnoreCase = True

objRegExp.Global = True

Set colMatches = objRegExp.Execute(strContents)

If colMatches.Count > 0 then

strTitle = objMatches(0).Value

Else

strTitle = ""

End If

Set objRegExp = Nothing

Response.write(strTitle)