EXCEL文件进行OLE处理Application.Workbooks.Open大于1M报错

Cideason 2015-03-10 03:07:13
EXCEL文件进行OLE处理Application.Workbooks.Open大于1M的报错,则打不开。

code:
f_openexcel(as_filename)
//as_filename //Excel 文件

int li_ret
oleobject lole_excel
lole_excel = create oleobject
li_ret = lole_excel.ConnectToObject('Excel.Application')
If li_ret <> 0 Then
li_ret = lole_excel.ConnectToNewObject('Excel.Application')
If li_ret <> 0 Then
messagebox('错误','打开EXCEL失败!')
return -1
End If
End If

If not FileExists(as_filename) Then
lole_excel.DisconnectObject()
messagebox('錯誤','文件不存在!')
return -1
End If

//OLE打开EXCEL文件
//as_filename 是由PB OLEStorage,OLEStream 存储为Excel文件。
lole_excel.Application.Workbooks.Open(as_filename) // as_filename 文件大于1M就报错,打不开。
if not isvalid(lole_excel.application.activeworkbook) then
lole_excel.application.Workbooks.close()
lole_excel.application.quit()
lole_excel.disconnectobject( )
destroy lole_excel
return -1
end if


//因为需要打开excel文件 处理。
//是否有其他方法或解决方式。


...全文
849 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
tianantong 2015-08-15
  • 打赏
  • 举报
回复
判断应该是转出文件有问题,目前也碰到这个问题,但是那个dw2xls太复杂,很难去啃
tianantong 2015-08-15
  • 打赏
  • 举报
回复
很关心此问题怎么解决
WorldMobile 2015-03-10
  • 打赏
  • 举报
回复
lole_excel.Application.Workbooks.Open(as_filename) 改为: ole_excel.workbooks.open(ls_filename) 经过测试,pb10下打开1M的文件没有问题,也有可能是你生成的文件有问题,你也可以找一个1M以上的文件试一下,不要用你自己生成的
Cideason 2015-03-10
  • 打赏
  • 举报
回复
//经过测试 office 2013之前的版本都报错,office2013则没报错。

1,079

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧