滾動天氣預報-調用天氣網頁

<% On Error Resume Next Function RemoveHTML(strHTML) Dim objRegExp, Match, Matches  Set objRegExp = New Regexp objRegExp.IgnoreCase = True objRegExp.Global = True '取閉合的<> objRegExp.Pattern = "<.+?>" '

>>阅读原文<<