|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
开发语言
→
『 VB6论坛 』
→ 已结贴
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
1200
人关注过本帖
标题:
已结贴
只看楼主
加入收藏
a251357
等 级:
论坛游民
帖 子:42
专家分:14
注 册:2014-4-24
结帖率:
90%
楼主
收藏
已结贴
√
问题点数:20 回复次数:4
已结贴
已结贴
[此贴子已经被作者于2017-1-15 05:20编辑过]
2016-09-08 18:14
举报帖子
使用道具
赠送鲜花
风吹过b
等 级:
贵宾
威 望:
364
帖 子:4947
专家分:30084
注 册:2008-10-15
第
2
楼
收藏
得分: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
等 级:
论坛游民
帖 子:42
专家分:14
注 册:2014-4-24
第
3
楼
收藏
得分:0
回复 2楼 风吹过b
麻烦楼主请给详细过程..
虽然有进行封装但还是不懂怎么运用
如如何将
https://bbs.bccn.net/post.txt
内的数据直接加载到list1控件里?
2016-09-08 22:52
举报帖子
使用道具
赠送鲜花
风吹过b
等 级:
贵宾
威 望:
364
帖 子:4947
专家分:30084
注 册:2008-10-15
第
4
楼
收藏
得分: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
等 级:
论坛游民
帖 子:42
专家分:14
注 册:2014-4-24
第
5
楼
收藏
得分:0
回复 4楼 风吹过b
谢谢版主了..可测试结果还是不行!!!!
2016-09-09 18:50
举报帖子
使用道具
赠送鲜花
5
1/1页
1
快速回复:
已结贴
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.024054 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved