microsoft.xmlhttp来获取重定向网址的值

时间:2011-06-15 05:22:25

标签: http xmlhttprequest

我正在使用脚本语言和微软ActiveX

oxmlhttp = createobject("microsoft.xmlhttp")

抓取HTML页面。 我还想在我的代码中找到我的旧网址在浏览器中重定向的新网址。

E.g。

http://www.comlaw.gov.au/ComLaw/Management.nsf/all/bytitle/AA40ED158FCF0A9BCA256F7100071796?OpenDocument

成为

http://www.comlaw.gov.au/Series/C2004A00446

我无法看到如何从此对象公开的方法中收集它。我应该用其他东西吗?

1 个答案:

答案 0 :(得分:0)

我使用Internet Explorer ActiveX解决了我的问题

oie = createobject("internetexplorer.application")
oie.Navigate( old_url)
redirected_url = oie.LocationURL