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檔案 處理。
//是否有其他方法或解決方式。
uj5u.com熱心網友回復：
//經過測驗 office 2013之前的版本都報錯，office2013則沒報錯。
uj5u.com熱心網友回復：
lole_excel.Application.Workbooks.Open(as_filename)改為：
ole_excel.workbooks.open(ls_filename)
經過測驗，pb10下打開1M的檔案沒有問題，也有可能是你生成的檔案有問題，你也可以找一個1M以上的檔案試一下，不要用你自己生成的
uj5u.com熱心網友回復：
很關心此問題怎么解決uj5u.com熱心網友回復：
判斷應該是轉出檔案有問題，目前也碰到這個問題，但是那個dw2xls太復雜，很難去啃轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/33007.html
標籤：基礎類
上一篇：PB讀取組態檔的相關問題
下一篇：用PB撰寫一個記事本程式