| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2926 人关注过本帖
标题:如何用VFP命令将EXCEL文件另存为MHT格式?
只看楼主 加入收藏
lfyjg
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2007-10-16
收藏
 问题点数:0 回复次数:4 
如何用VFP命令将EXCEL文件另存为MHT格式?

将EXCEL文件换名存为文本文件用以下命令:
oExcel=CREATEOBJECT("Excel.application")
oExcel.Workbooks.Open("C:\123.xls")
oExcel.ActiveWorkBook.Saveas("c:\123.txt",-4158)

请问如何将EXCEL文件换名存为 MHT 格式文件呢?


[此贴子已经被作者于2007-10-17 15:47:33编辑过]

搜索更多相关主题的帖子: VFP EXCEL MHT 命令 格式 
2007-10-17 14:35
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 

expression.SaveAsXMLData(Filename, Map)
将已映射到指定 XML 架构映射的数据导出到 XML 数据文件中。

expression 必需。该表达式返回“应用于”列表中的对象之一。

Filename String 类型,必需。该字符串显示了要保存的文件的名称。可为文件指定完整的路径,否则,Microsoft Excel 会将文件保存在当前的文件夹中。

Map XmlMap 对象,必需。应用于数据的架构映射。

说明
如果 Excel 不能使用指定的架构映射导出数据,则此方法会产生运行时错误。若要检查 Excel 是否能够使用指定的架构映射导出数据,请使用 IsExportable 属性。

示例
下例证实了 Excel 能够使用架构映射“Customer”导出数据,然后将映射到“Customer”架构映射的数据导出到名为“Customer Data.xml”的文件中。

Sub ExportAsXMLData()
Dim objMapToExport As XmlMap

Set objMapToExport = ActiveWorkbook.XmlMaps("Customer")

If objMapToExport.IsExportable Then

ActiveWorkbook.SaveAsXMLData "Customer Data.xml", objMapToExport
Else
MsgBox "Cannot use " & objMapToExport.Name & _
"to export the contents of the worksheet to XML data."
End If
End Sub


感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2007-10-17 15:14
lfyjg
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2007-10-16
收藏
得分:0 
呵,看不懂呀,根据我上边的例子直接列出一条语句好吗?
2007-10-17 15:48
nkactuary
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2007-9-3
收藏
得分:0 
回复:(Tiger5392)expression.SaveAsXMLData(Filena...
用append命令可以实现
append from "D:\book1.xls" type xl8 sheet "sheet1"
这个要事情建好表结果,看似麻烦,实际上这个用的更舒服,因为导入数据符合你的需要。
2007-10-18 22:47
zz10903
Rank: 1
等 级:新手上路
帖 子:14
专家分:5
注 册:2006-9-18
收藏
得分:0 
将excel另存为单个文件网页(*.mht;*.mhtml)
oExcel.ActiveWorkBook.Saveas("demo.mht",45)
2007-11-21 01:11
快速回复:如何用VFP命令将EXCEL文件另存为MHT格式?
数据加载中...
 
   



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

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