登录社区:用户名: 密码: 忘记密码 网页功能:加入收藏 设为首页 网站搜索  

文档

下载

图书

论坛

安全

源码

硬件

游戏
首页 | 信息 | 空间 | VB | VC | Delphi | Java | Flash | 补丁 | 控件 | 安全 | 黑客 | 电子书 | 笔记本 | 手机 | MP3 | 杀毒 | QQ群 | 产品库 | 分类信息 | 编程网站
  立华软件园 - Visual Basic 专区 - 技术文档 - 网络编程 技术文章 | VB源代码 | 电子图书 | VB网站 | 相关下载 | 在线论坛 | QQ群组 | 搜索   
 VB技术文档
  · 窗体界面
  · 系统控制
  · VB.Net
  · 多媒体
  · 网络编程
  · API函数
  · 游戏编程
  · 数据报表
  · 其他文档
 VB源代码
  · 窗体界面
  · 文件目录
  · 多媒体
  · 网络编程
  · 系统API
  · 数据报表
  · 游戏编程
  · VBA办公
  · 其他代码
 VB论坛
  · Visual Basic 讨论区
  · VB.Net 讨论区
  · VB数据库开发讨论区
  · VB系统API讨论区
 其他VB资源
  · VB下载资源
  · VB电子图书
  · VB QQ群组讨论区
  · VB 其他网站资源




保存页面为MHT的代码
发表日期:2005-02-24作者:李立华[原创] 出处:立华软件园  

       有是我们打开一个网页,里面有图片等好多内容,用IE可以直接存为“Web 档案,单一文件(*.mht)”,IE虽然有这个功能,那么我们的程序能不能也有这个功能?

       答案是肯定的,这需要我们引用“Microsoft CDO for Windows 2000 Library”。好,下面我们就开始这一功能。

       首先,新建一工程,点[工程]-[引用],选择“Microsoft CDO for Windows 2000 Library”。

       在窗体上添加一个按钮——“Command1”,双击按钮,在Command1_Click中添加如下代码:

    Dim a As New CDO.Message
    a.CreateMHTMLBody "http://www.lihuasoft.net", cdoSuppressAll, "", ""

    '打开立华软件园,并保存成MHTML格式
    Set b = a.GetStream
    b.SaveToFile "c:\1.mht" '保存到C盘
    MsgBox "OK"

       添加完成后,按F5,运行,然后点击按钮,当出现OK的时候,在C盘看看,是不是多了一个1.mht文件?双击打开,是不是立华软件园首页呀?

用记事本打开这个文件,已经是标准的MHT文件了。

      通过上面的方法,您可以实现保存MHT文件的功能,希望这个东西对您有用。

我来说两句】 【发送给朋友】 【加入收藏】 【返加顶部】 【打印本页】 【关闭窗口
中搜索 保存页面为MHT的代码

 ■ [欢迎对本文发表评论]
用  户:  匿名发出:
您要为您所发的言论的后果负责,故请各位遵纪守法并注意语言文明。

关于我们 / 合作推广 / 给我留言 / 版权举报 / 意见建议 / 广告投放 / 友情链接  
Copyright ©2001-2006 Lihuasoft.net webmaster(at)lihuasoft.net
网站编程QQ群   京ICP备05001064号 页面生成时间:0.00197