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

使用VB获得一页的HTML代码

HTML文档下载 WORD文档下载 PDF文档下载
使用VB获得一页的HTML代码



  加入WebBrowser、Timer、CommandButton控件各一个,然后使用以下代码:

Private Sub Command1_Click()
WebBrowser1.Navigate "http://www.programlife.com/"
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Dim doc, objhtml As Object
Dim i As Integer
Dim strhtml As String

If Not WebBrowser1.Busy Then
Set doc = WebBrowser1.Document
i = 0
Set objhtml = doc.body.createtextrange()
If Not IsNull(objhtml) Then
Text1.Text = objhtml.htmltext
End If
Timer1.Enabled = False
End If
End Sub
十亿月PV网站秘诀:Reddit自失败中总结的25条经验 粉碎5个NoSQL流言:各司其职,NoSQL的出现比关系型更早 豌豆荚发力移动游戏平台,推出SDK 2.0 BlackBerry Jam Asia 2013即将在香港隆重召开,免费门票限量提供 小米发布会高潮迭起:米3、电视、Hugo大牛 谷歌放在Windows上的特洛伊木马:Chrome Apps应用平台 解析:Google基于数据驱动的招聘面试程序 决战“缓存”之巅:微软 vs. 亚马逊 雪中送炭:十大前沿移动应用开发工具 高通智能手表Toq都用到了哪些技术? 研发周报:修改一行SQL代码 性能提升了100倍 2013年NoSQL就业趋势分析 鲜为人知的静态、命令式编程语言——Nimrod 高性能Web应用打造攻略:扩展过程中20个最大的绊脚石 开源项目Marathon:让你的数据中心像谷歌一样运行 精益化运营:10款移动统计分析工具推荐 移动建站工具(一):分秒钟将Web网站移动化 移动周报:小米的“倚天屠龙记” 智能手表是个尴尬的产品 屏幕缺陷一枪毙命 看15岁的谷歌的前21位员工现在都在做什么 分析师:三星将失去中国市场份额的头把交椅 5款工具助你写出更好的Java代码 Noitom:"中国创造"的动捕技术 缘创派:帮助技术人员寻找创业伙伴 Nginx创始人Igor Sysoev解读Nginx的发展史 对女性友好的编程语言 ISC2013专家云集,畅谈全球网络安全 CTO俱乐部第109期下午茶:数据库之分久必合,合久必分 CloudConvert:支持移动应用的格式转化服务 Angular.js VS. Ember.js:谁将成为Web开发的新宠? 斯卡利沉寂多年后首谈乔布 他的离开错在董事会不在我 熟悉化境编程界HTTP上传程序的请进! 我想将一个字符串(用户密码)加密,有没有好的算法,请大家指教 局域网搜索时,怎样连上要搜索的机子 如何分辨用户是通过在URL栏输入地址,还是点击链接来到本站网页。 好了,我把数据库清理一下,你继续改那几个参数,LOG文件太大先不要管 问题! “多步 OLE DB 操作产生错误。。。”怎么解决?? 急!!! 哪里有内存泄漏检测工具? 请问如何将80*60象素的图片文件转换为120*90象素的图片文件 哪位兄弟试过把csdn的文档里面的文章全部下到本地看的? APL和DOL表的区别?在系统中怎样设置(运用)?最好有示例。多谢先! 如何在一个函数内部知道这个函数的名字? “多步 OLE DB 操作产生错误。。。”怎么解决?? 急!!! _RecordsetPtr对象的Find方法怎样用? 等會過來喝點咖啡吧,今天晚上一定要測完 一个简单的fork问题(那个高手来帮忙呀) 一个关于安装的问题 在VC中用什么函数运行一个程序?像vb中的shell.比如运行QQ.exe 继续散分 急招游戏软件合作伙伴(美国项目外包) 有关更新表中的记录,有没有简洁的办法? 散分的理由 那位大侠能告诉我这是什么原因。Error 404--Not Found 研究生题目,大家试试,帮帮忙 新手问题! 请教EXCEL的公式问题? (高手请问:)linux下访问非本网段的一台主机 哪位兄弟试过把csdn文档栏目里面的文章全部下到本地看的? 哪位高手有中国象棋棋盘控件的开发文档 如何用VB自己做控件? 用 SQL SERVER 连接数据库的问题 谁给我发个2000的boot.ini文件?谢了!在线等 如何得到一个Sql server2000里面所有的数据库? sendbuf的问题 电脑在运行是突然自己重起是为什么? JAVA程序员成长之路 请问哪里有下Solaris x86就是在pc上运行的? 小弟我做得第一个网站的首页,请大家来pp,有高分哦!! .:送分,结束第二次恋爱:. 谁能帮我解决这个问题啊!(分数不够可以再加) 简单啊,我不会啊,放分啊。 JDBC的一个问题 有什么办法可以检测/过滤通过ISA发送的Email? 水晶报表可以动态生成报表列吗? 有关对话框画图的问题 高手请进来 关系型数据库试题,帮帮忙 给200分。谁知道ServU自带的用户密码加密算法? 请问为什么找不到类定义 JDBC的又一个问题 Combo下拉列表框!!!! I always believe the sun goes around the globe歌词汉语什么意思 around 当它是环球的讲时还可以用什么单词替代 DOLPHIN☆JET 罗马音标歌词就是健康全裸游泳部的片头曲啊要罗马音标的~~谢谢了~~ 1._______ fast the boy ran!A.How B.How an C.What D.What an 为什么是选B? What is an active poisoner and what is a passive poisoners? can you do this test?什么人称前用has ,什么人称前用have. 造句:忘记了...忘记了...忘记了... "全力以赴是我的礼貌" 用英语怎么说?在两方对战时,日本人常说的这句话,用英语怎么说? if you want me,let me konw “我一定会全力以赴!一定!”用英语怎么说? around可以用什么单词代替 遵义市委书记廖少华被调查 曾多次强调英国发生强烈暴风雨天气已致4死 逾6德国社民党称需要成立调查委员会 斯诺安倍突访土耳其 传为劝阻土放弃购中国媒体称废品价格10年不涨 收一车东西江苏沛县办公楼豪华超标 称四套班子领坦桑尼亚军方证实一名坦维和军人在刚果温岭数百医护人员哀悼遇害医生 上百医纽约油价28日继续反弹纽约华裔灭门案凶手因妒忌动杀机 与被安理会将与伊斯兰合作组织加强合作临沂8月大女婴与奶奶离奇失踪6家快递统一涨价被查美国女子巴厘岛陈尸行李箱闹剧“健”底牛仔风省检察院“捂”“盖”系统内问题援藏惠民生态农业结硕果林志玲粗腿照曝光 被讽身材走样(图)澳洲旅游业望简化入境手续 新西兰响应名酒变民酒,光瓶酒成“新宠”艺术资讯
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘