注册 登录
编程论坛 VB6论坛

请教大神 请问怎样从网页中获取自己想要的关键字

dengjie4641 发布于 2013-04-16 20:21, 658 次点击
我想开发一个vb程序实现 从某个天气预报网站中获取七天的天气预报  但是不知道怎么实现  请问用哪个组件 什么方法 我知道怎样获取网页源代码 但是不会怎样提取关键字  求大神不吝赐教!谢谢
3 回复
#2
风吹过b2013-04-17 08:47
最笨的方法:
搜索地点,然后从地点向后点有多少字符,然后 截取 就是了。

稍好一点的方法:
搜索地点,然后再后搜索  HTML 标记,找到所需的标记,然后再 截取 就是了。

如果无法解析时,就用第二种方法吧。这个要针对网页源代码来看。
#3
a8141532013-04-27 11:21
Private Sub CommandButton1_Click()    ' 获取北京市的天气信息
    Dim arr()
    With CreateObject("Microsoft.XMLDOM")
        .async = False
        .Load "http://php.weather.北京&password=DJOYnieT8234jlsK&day=0"
        Set s = .DocumentElement.ChildNodes(0).ChildNodes
        ReDim arr(1 To 2, 1 To s.Length)
        For i = 0 To s.Length - 1
            arr(1, i + 1) = s(i).nodeName
            arr(2, i + 1) = s(i).Text
        Next i
        'Range("a1").Resize(UBound(arr, 1), UBound(arr, 2)) = arr
    End With
End Sub
#4
anluboy2013-05-07 18:55
回复 3楼 a814153
不错··
1