经典ASP在字符串中等于之后得到数字

时间:2014-06-20 13:18:51

标签: vbscript asp-classic

我对经典ASP相当新,我遇到了一些问题。希望有一个解决方案。

基本上我需要将一个站点从经典的ASP转移到PHP。需要从每个页面的正文内容中提取所有内部链接,以便我可以将它们重写为不同的URL。我会手动执行此操作,但有超过200页,每页有大约10个链接,如果不是更多。

当前的href看起来像这样 - default.asp?contentID = 123

123是页码。它们的范围从1到288

我想要做的是搜索内容正文字符串找到这些链接然后用URL友好链接替换它们,这将是页面名称,即domain.co.uk/page-name。我可以找到default.asp?conentID =很容易,因为它对所有链接都是一样的,问题是获取它旁边的ID号,所以我知道要将其重写为。

非常感谢任何帮助

1 个答案:

答案 0 :(得分:0)

使用InternetExplorer COM对象和For Each循环:

Set ie = CreateObject("InternetExplorer.Application")

For i = 1 To 288
  ie.Navigate "http://www.example.com/default.asp?contentID=" & i
  While ie.ReadyState <> 4 : WScript.Sleep 100 : Wend
  For Each anchor In ie.document.body.getElementsByTagName("a")
    WScript.Echo anchor.href
  Next
Next

ie.Quit