从文档中分离excel附件到磁盘,再打开该xls文件
来源:互联网 发布:淘宝gxg官方店和旗舰店 编辑:程序博客网 时间:2024/05/29 23:22
Dim s As New notessession
Dim db As notesdatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim neo As NotesEmbeddedObject
Dim temVar As Variant
Dim rtitem As NotesRichTextItem
'Dim tempNeo As NotesEmbeddedObject
Set db = s.CurrentDatabase
Set view = db.GetView("dywdgl(bytime)")
Set doc = view.GetFirstDocument
If doc.HasEmbedded Then
Msgbox("有附件")
End If
Set rtitem = doc.GetFirstItem( "zhengwen" )
Forall o In rtitem.EmbeddedObjects
'把附件拆出来
Call o.ExtractFile("d:\Lotus\Domino\Data\"+o.Name)
End Forall
Set excelworkbook = excelapplication.Workbooks.Open ("d:\123.xls")
Messagebox ("已经打开xls文件")
excelworkbook.close(False)
excelapplication.quit
Set excelapplication=Nothing
- 从文档中分离excel附件到磁盘,再打开该xls文件
- 300.13从磁盘读取一个文件到内存中,再打印到控制台
- Delphi操作EXCEL复制Sheet到另一个XLS文件中
- 将DataTable数据导出到Excel文件中(xls)
- javascript下:从xls文件中导数据到数据库
- 从数据库中提取文件到磁盘
- 创建XML文档并保存到磁盘文件中(GBK)
- matlab中读取excel的xls文件
- Excel2010创建包含数据有效性的xls文件,再打开时有效性变无效
- 将html中table导出到excel xls文件的一种可用方法
- Python--使用xlwt将列表类型的数据写到Excel xls文件中--TxtToExcel
- 用poi技术把EXCEL(.xls)文件读取到java对象中
- “Excel 无法访问“Sample.xls”。该文档可能为只读或加密文档。”的解决
- 从mysql导出到excel 格式为.xls
- 把PE映像文件从内存中DUMP到磁盘
- 把PE映像文件从内存中DUMP到磁盘
- 把PE映像文件从内存中DUMP到磁盘
- 从键盘输入一系列字符串,写入到某磁盘文件中
- NYOJ 吝啬的国度(DFS)
- mysql存储引擎
- windows下利用gdi+读取图片并转换成opengl纹理支持的像素格式
- 备份mysql数据库
- 各数据库时间比较
- 从文档中分离excel附件到磁盘,再打开该xls文件
- EIGRP概述及邻接关系
- 《C专家编程》读书笔记6
- oracle 3
- C#,C/S升级更新
- vim命令
- android源码解析 ---- camera 照相机 摄像机 .
- Android SurfaceFlinger process 流程分析
- Spring Security 2 配置