| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1200 人关注过本帖
标题:已结贴
只看楼主 加入收藏
a251357
Rank: 2
等 级:论坛游民
帖 子:42
专家分:14
注 册:2014-4-24
结帖率:90%
收藏
已结贴  问题点数:20 回复次数:4 
已结贴
已结贴

[此贴子已经被作者于2017-1-15 05:20编辑过]

2016-09-08 18:14
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:14 
Public Function GETHTML(url As String)
'使用 a814153 的代码 进行封装
    With CreateObject("WinHttp.WinHttpRequest.5.1")
        .Open "GET", url, False
        .send
        GETHTML = .responseText
    End With
End Function

这个函数,直接返回网页的代码。应该是解过码的。

授人于鱼,不如授人于渔
早已停用QQ了
2016-09-08 21:03
a251357
Rank: 2
等 级:论坛游民
帖 子:42
专家分:14
注 册:2014-4-24
收藏
得分:0 
回复 2楼 风吹过b
麻烦楼主请给详细过程..
虽然有进行封装但还是不懂怎么运用
如如何将 https://bbs.bccn.net/post.txt 内的数据直接加载到list1控件里?
2016-09-08 22:52
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:0 
不愿写了。说个大概吧。

先 读内容
s=GETHTML("网址")

然后对 S 进行分解为一行一行的。
fj=split(s,vbcrlf) 或 fj=split(s,vbcr)   与远程文件的格式有关。
然后遍类每一行,添加进去
for each s2 in fj
  list1.AddItem s2
next



[此贴子已经被作者于2016-9-9 08:47编辑过]


授人于鱼,不如授人于渔
早已停用QQ了
2016-09-09 08:44
a251357
Rank: 2
等 级:论坛游民
帖 子:42
专家分:14
注 册:2014-4-24
收藏
得分:0 
回复 4楼 风吹过b
谢谢版主了..可测试结果还是不行!!!!
2016-09-09 18:50
快速回复:已结贴
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024054 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved