以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  代码问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=48940)
--  作者：qianqian1530
--  发布时间：2014/4/9 10:53:00
--  代码问题
Dim hec As System.Windows.Forms.Htmlelement = elem.GetElementsByTagName("UL")(0)
Dim yuanjia As System.Windows.Forms.HtmlElement
Dim xiaoshoujia As System.Windows.Forms.HtmlElement
If hec.OuterHtml.Contains("del") Then
yuanjia = elem.GetElementsByTagName("UL")(0).GetElementsByTagName("Li")(0).GetElementsByTagName("del")(0)
xiaoshoujia = elem.GetElementsByTagName("UL")(0).GetElementsByTagName("Li")(0).GetElementsByTagName("SPAN")(0)
Else
xiaoshoujia = elem.GetElementsByTagName("UL")(0).GetElementsByTagName("Li")(0).GetElementsByTagName("SPAN")(0)
End If



以上 

  代码中明明 有 del 标签，  但执行的时候 就会跳过， 去···  怎么解决呢
--  作者：Bin
--  发布时间：2014/4/9 10:55:00
--  
如果有,是不会跳过的.一步步调试测试吧.


把内容输出来看一下就知道了
--  作者：qianqian1530
--  发布时间：2014/4/9 11:03:00
--  
调试过， 
只会输出 xiaoshoujia = elem.GetElementsByTagName("UL")(0).GetElementsByTagName("Li")(0).GetElementsByTagName("SPAN")(0)  的数据....
--  作者：有点甜
--  发布时间：2014/4/9 11:09:00
--  
 把这个html文件发上了看看，说明要获取哪些信息。
--  作者：qianqian1530
--  发布时间：2014/4/9 11:17:00
--  
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:亚马逊采集器.zip
  
窗口里  直接 单击获取 就行   

现在问题是




图片点击可在新窗口打开查看此主题相关图片如下：qq截图20140409121516.png
图片点击可在新窗口打开查看

价格里，   灰色带横线的是原价，   红色的是  销售价格，，
 
但获取的时候 ，只会采集到  销售价格
--  作者：Bin
--  发布时间：2014/4/9 11:39:00
--  
.
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:亚马逊采集器.rar
--  作者：有点甜
--  发布时间：2014/4/9 11:40:00
--  

 看了一下，改成这样就行了

 

If hec.OuterHtml.Contains("DEL") Then
--  作者：qianqian1530
--  发布时间：2014/4/9 12:00:00
--  
居然 犯这么简单的错误...