说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何从 Internet 上取回某一个网页的內容?

HTML文档下载 WORD文档下载 PDF文档下载
VB如何从 Internet 上取回某一个网页的內容?
版本:VB6 / VB5



新建一个新工程,加入一个 Internet Transfer Control、一个 CommandButton 及二个 TextBox!

Text1 用來输入要取取的网页位址,例如:http://www.microsoft.com/taiwan/support/products/vb.htm
Text2 用來输入要存文件的完整文件名,例如:c:\temp\temp.htm

Private Sub Command1_Click()
Dim b() As Byte
'取消所有操作
Inet1.Cancel
'设定协议为 HTTP
Inet1.Protocol = icHTTP
'设定 URL 属性
Inet1.URL = Text1.Text
'将读取的 HTML 数据放进一个 byte array.
b() = Inet1.OpenURL(, icByteArray)
'建立一个暂存文件來存放取回來的 html 文件
Open Text2.text For Binary Access Write As #1
Put #1, , b()
Close #1
End Sub
好了,就是这么简单,试看看吧!


大事件:三大运营商将发布融合计费SDK 再培养一个扎克伯克:六款适合儿童上手编程的App 首届中国软件工程标准高峰论坛:软件开发的新机遇与挑战 Verizon研究显示:中国成为2012年度网络间谍攻击的主要来源 Clang宣布全面支持C++11标准 北大陈钟:SEMAT—中国软件工程发展的新机遇 超华尔街预期:苹果第二财季营收为436亿美元 跨平台游戏引擎Spaceport已被Facebook收购 文科生开发GPU数据库 性能超传统数据库70倍 开发者赚了90亿:从苹果Q2财报,看iOS生态 备受开发者青睐的13款热门开源项目 Netflix赌赢《纸牌屋》背后的秘密武器:大数据分析 为什么:Google Glass只能运行Web应用? 对话Rackspace高级副总裁Jim Curry:我们没有"辜负"营销炒作 7个大数据流言——避免错误的Hadoop和云分析决策 Facebook vs. Google:撇开搜索,数据中心产业上的又一竞技 苹果将于6月10日召开WWDC 新版OS X和iOS或将面世 传Amazon今年秋季发布电视机顶盒设备 够快:不会3种以上语言的程序员不是好程序员 Cloud Foundry、Greenplum获通用电气1亿美元注资 微软推超强Android应用Switch to Windows Phone Unity CEO宣布:放弃支持Flash平台 为交房租做App:我第一年赚了7万美金 iOS越狱大神Comex加盟Google 曾错过苹果Offer 维基百科正式从MySQL迁移到MariaDB数据库 JavaScript MVC框架PK:Angular、Backbone、CanJS与Ember 大数据推广引领精准推广浪潮 ThoughtWorks负责人曾学海:数字渠道细分带来的架构演进 你画我猜2 : Draw Something 2正式发布 云中游科技CEO张帆:畅谈“找你妹”的自营销 Oracle当心,MySQL原始团队已重整旗鼓! 500分求菜单功能。 很急的问题!希望大家帮忙! jb8中类找不到了??? 请教高手:如何让label显示在text、button等的上面? 新手请高手帮忙了~~~ 谢谢~~~ 500分求菜单功能。 修改数据,提交保存老报错,纳闷~~~ 急!在RED HAT LINUX中怎么配置POP和STMP服务器? 散分呵呵 是真还是假,群众的眼睛是雪亮的! 求助:XP和2003双操作系统,XP用PQ分区后在2003里找不到? 500分求菜单功能。 treeview控件,如何让其点击结点后再从数据库中取得这个节点的下一层节点? 如何在SQL SERVER 2000导入mis.bak文件? HELP!一道规划问题的优化!源代码 虚心的小弟,散分(分不多) 在线等待!!sql 无法登陆 500分求菜单功能。 用VC写的dll在vb上怎么用? 这样的sql 怎样写 WIN2000和LINUX与APACHE的搭配的困惑 高分求助,各位进来帮一帮吧,有问题请教,急,急!!! 找不到包在线等 我就不相信CSDN没有高手,帖出代码求救!!! 在服务器端监视客户记录 怎样使用vc+soap kit调用web service,麻烦添加注解! 中国科普之我见(普鲁日尼科夫),一种局外人难得的评说,你一定要看! 怎么找到这个东西 jScrollPanel.getViewport这个里面的getViewport代表了什么?Viewport的作用是什么?谢谢 ███请问,如何判断"\\192.168.0.123\temp"这个目录是否存在?███ 谁可以告诉我如何通过msflexgrid实现查询? 高分相给! 迷茫啊................ 大家来看看1997--2002的历届Jolt震撼大奖名单~ mmqm.exe 篡改IE的问题。给分!! EJB设计模式.实战EJB.精通EJB......等等----一个超好网址 简单快速 资源不敢独占 拿出来分享 如何实现打印功能? 怎样才能填充由两条贝塞尔曲线围成的封闭区域,谢谢了 请教关于数据库连接的问题 在sstab控件上怎么动态添加控件! ★★★★★★应邀申请[专题开发]版主,谢谢大家支持!★★★★★★ 通过代理(采用XP自带internet共享)上网的奇怪问题! 怎样才能将3DMAX做的动画嵌入到DELPHI7中,各位求救啦!? 请教一个困扰我好长时间的问题? 【回复被误删,导致本人满性欲降低,悲痛欲绝,请版主回复本人性欲】 如何判断窗体已经Unload,但还没有成为Nothing? 怎样修改jboss-3.2.1_tomcat-4.1.24的端口号,请多指教 word文档怎么打不开 HELP!一道规划问题的优化! 问题描述(太长了,只好发到2个贴子) 怎么找到这个东西 怎样将一个16进制的数转换为2进制 刚接触vc,有关List Box控件的问题 一个斜土旁一个祀不要衣字旁读作什么字呀? 请教我第一大题的2,3两题应该怎么做 对于残疾人 我们应该用怎样的话语激励他们 IQ达人是什么意思 英语翻译求这首诗的原版翻译关于9.11的 IF I KNEW If I knew it would be the last time That I''d see you fall asleep,I would tuck you in more tightly and pray the Lord,your soul to keep.If I knew it would be the last time that I see you w 关于老舍又是一年芳草绿老舍又是一年芳草绿的题目渊源请结合该文章作具体品评该题目选取缘由 台灯频闪有哪些可能的原因?原来的台灯频闪了,于是这几天换了一个.结果没用一会新的又开始闪.是灯自身的原因还是电源什么的外部问题?PS前后两盏灯都是白色光线的护眼灯.用的是节能灯 团购券验证有效期什么意思 填大于小于或等于7∕3乘5( )5又7分之三 七分之三乘五( )七分之三 七分之三乘五( )五 七分之三乘七分之三( )七分之三 七分之三乘一又七分之三( )七分之三 第一大题怎么做的.还有第二题怎么做的. 又是一年芳草绿作文求又是一年芳草绿的作文题材, 中国政府向柬埔寨提供洪灾捐款加纳抓捕43名涉嫌非法采金中国公民中方要求美方对其驻华使领馆设监听点报中国网媒业界人士呼吁“清朗网络空间”商务部:对欧盟太阳能级多晶硅双反调查温州电镀基地成立业委会 自治投票管住浙江男子纵容亲弟高速练车 赔了弟弟又斯诺登莫斯科生活照曝光 休闲打扮未戴欧元区10月份通胀率降至四年来最低尼日尔沙漠一移民车抛锚 现场发现92律师称斯诺登将从11月起在俄大型网站球场扩建,切尔西可能暂离蓝桥空客子公司疑在华行贿,涉及中国国有航女人,你真的会穿衣服吗?华为郭平:\"神一样的对手\"都灭亡爱学贷旗下米庄理财 主打“透明” 震撼:未来转基因猪提供无限器官来源华润金融副总蒋伟被查,疑卷入宋林案【快讯】传统大企业借势互联网金融升级“三座大山”压顶,小米模式其实很脆弱大盘失守5000点,A股缘何大跌? 为什么说俄罗斯加息是在摧毁卢布断袖总裁的落跑新娘笑面罗刹明末边军一小兵天眼死神之地狱归来梦幻控位地狱猎场第一次亲密接触邪恶一生灌篮之青春无敌绩溪旅游雅安旅游湖州旅游吐鲁番旅游新都桥旅游高雄旅游崇武旅游朱家尖旅游芜湖旅游伊犁旅游义乌旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘