用vb编程语言，怎么获取百度搜索结果中十个排名的原来的链接，因为搜索结果中的链接，源码中是的链接是加密的，怎么得到那条信息本来的链接呢？用vb实现，哪位大神帮一下，直接能获取像http://www.baidu.com/link?url=xMGUk8-ZUXKjs7ipele_N8Y7un9M2ltwIOTxWr9q0aTjvIgVxLcyUrNtWPWOo-qH&wd=%E6%98%9F%E8%AF%AD%E5%BF%83%E6%84%BF&ie=utf-8&tn=baiduhome_pg&bs=%E5%95%8A%E6%92%92%E5%9C%B0%E6%96%B9%E5%98%8E%E6%96%AF%E5%9C%B0%E6%96%B9&f=3&rsv_bp=1&rsv_spt=3&rsv_sug3=12&rsv_sug4=817&rsv_sug1=18&oq=xingyuxinyuan&rsv_sug2=1&rsp=0&inputT=1441&rsv_sug=7，这样的加密过的链接，怎么得到这条信息的原始链接呢，他的原始链接是：http://www.，怎么通过vb得到呢，哪位大侠知道

自己顶吧

最辛苦的办法是，你去研究一下 百度是用什么方式加密的。

最笨的最直接的方法是：
使用 winsock 模拟浏览器 或者使用 inter 打开这个链接，然后读取收到的数据，到收到的数据里去找 跳转命令，找到 最终的命令。
这个方法，每条链接都需要读一遍百度，但这个办法百度不能因为更换加密方式 而 屏避 。

当然你用 Webbrow 打开链接，然后读 webbrow 最后的地址的方法也可以。但这种会造成更多的资源浪费。

资源开销：
webbrow>inter>winsock
代码复杂性：
webbrow>winsock>inter

Sub 原始链接()
    With CreateObject("WinHttp.WinHttpRequest.5.1")
        .Open "GET", "http://www.baidu.com/link?url=xMGUk8-ZUXKjs7ipele_N8Y7un9M2ltwIOTxWr9q0aTjvIgVxLcyUrNtWPWOo-qH&wd=%E6%98%9F%E8%AF%AD%E5%BF%83%E6%84%BF&ie=utf-8&tn=baiduhome_pg&bs=%E5%95%8A%E6%92%92%E5%9C%B0%E6%96%B9%E5%98%8E%E6%96%AF%E5%9C%B0%E6%96%B9&f=3&rsv_bp=1&rsv_spt=3&rsv_sug3=12&rsv_sug4=817&rsv_sug1=18&oq=xingyuxinyuan&rsv_sug2=1&rsp=0&inputT=1441&rsv_sug=7", False
        .Send
        MsgBox Split(.responsetext, "'")(1)
    End With
End Sub

又学到点有用的知识了