PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
21699 | 05/01/14 18:05:39 | RE(3):PB6.5: Excelのメモリ解放 By yu-suke |
21697 | 05/01/12 18:53:34 | RE(2):PB6.5: Excelのメモリ解放 By miumiu59 |
21694 | 05/01/12 11:34:03 | RE(1):PB6.5: Excelのメモリ解放 By yu-suke |
21693 | 05/01/11 13:28:36 | PB6.5: Excelのメモリ解放 By miumiu59 |
カテゴリ:PowerBuilderの開発環境
日付:2005年01月12日 11:34 発信者:yu-suke
題名:RE(1):PB6.5: Excelのメモリ解放
miumiu59さん、こんにちは。
私も同様の処理を行った事がありますが、うる覚えですので参考程度に読んで下さい。
xlsole.ConnectToNewObject(\"excel.application\")
\"New\"を行っている場合は、最後の保存処理
\"Save()\"が出来なかったと思います。
ConnectToNewObject → SaveAs()
ConnectToObject → Save()
また、CLOSE()してからSLEEP(1)をしてDisconnectObject()をすると
うまく開放されると場合があると書いてあった気がします。
言葉足らずの説明ですが、お役にたてれば幸いです。
>お疲れ様です。
>
>以下の処理を行っているのですが、どうやっても裏にExcelが起動されたままで
>終了してくれません。
>ConnectToNewObjectを1回にしてみたり、DESTROYが記述してなかったので、
>追加してみたりと同様の質問があったので、それを参考にしてみたのですが、
>どうもうまくいきません。
>
>他に何かしなければいけないことがあるのでしょうか?
>
>よろしくお願いします。
>
>/***********************************************************/
>oleobject xlsole
>
>//エクセルオープン
>xlsole = CREATE oleobject
>li_rtn = xlsole.ConnectToNewObject(\"excel.application\")
>xlsole.Application.Workbooks.Open(l_str_cp_name)
>
>do until FileExists (l_str_cp_name) = TRUE
>loop
> //セルへセット
>next
>
>
>xlsole.Application.ActiveWorkbook.Save() //上書き保存
>xlsole.Application.Workbooks.Close()
>xlsole.Quit;
>
>li_rtn = xlsole.DisconnectObject()
>DESTROY xlsole // インスタンス破棄
>/***********************************************************/
>
>Excel2000を使用しています。
>
>
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows98
DBMS Oracle SQL*Net 8
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.