主题：[求助]我想获取阿里妈妈淘宝客单品网页链接地址，能实现吗？

窗口里弄一个webbrowser控件，登陆后到达对应的项目，然后获取对应的东西

类似 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77679&skin=0

替换一下a标签即可。参考

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=73886&skin=0

汗，我登陆没有这个东西，无法测试。

你把账号密码发上来测试一下。发布一个帖子后，再点击编辑，就可以插入 【特殊内容】的，只有特定的人才能看到。

比如

Dim web = Forms("窗口1").Controls("WebBrowser1").BaseControl
For Each tr As object In web.Document.GetElementsByTagName("li")
    If tr.GetAttribute("ClassName") = "title"
        Dim a = web.Document.GetElementsByTagName("a")(0)
        output.show(a.GetAttribute("href"))
    End If
Next

HtmlElement  类型

http://www.baidu.com/baidu?wd=HtmlElement+msdn&tn=monline_4_dg

代码没问题，自己msgbox看一下内容对不对。

不会做，就把htm网页保存发上来。

灵活变通啊

Dim web = Forms("窗口1").Controls("WebBrowser1").BaseControl
For Each tr As object In web.Document.GetElementsByTagName("span")
    If tr.GetAttribute("ClassName") = "color-red"
        Dim a = web.Document.GetElementsByTagName("a")(0)
        output.show(a.GetAttribute("href"))
    End If
Next

看23楼啊，加入msgbox弹出所有的值啊。

不会做把账号密码发上来