PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
19065 | 03/03/14 18:25:43 | RE(8):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By t-shimmy |
19064 | 03/03/14 18:15:35 | RE(7):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By ryochan |
19062 | 03/03/14 17:03:56 | RE(6):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By t-shimmy |
19059 | 03/03/14 16:06:37 | RE(5):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By ryochan |
19057 | 03/03/14 14:23:02 | RE(4):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By t-shimmy |
19054 | 03/03/14 07:52:10 | RE(3):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By ryochan |
19031 | 03/03/11 17:33:50 | RE(2):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By t-shimmy |
18998 | 03/03/09 21:14:22 | RE(1):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By reon |
18991 | 03/03/07 17:09:16 | PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが By t-shimmy |
カテゴリ:PowerBuilderの開発環境
日付:2003年03月14日 07:52 発信者:ryochan
題名:RE(3):PB5.0.01: OLEオートメーションを使ってEXCELファイルにデータをセットすると落ちてしまうのですが
t-shimmyさん、こんばんは。
1.
>問題は、DWを印刷したときに計算カラムが何で出力されないかなんですが、
>どなたか、同じ経験をして解決された方、方法を教えていただけませんでしょうか?
ドライバによって表示されたりされなかったりするのであれば、
ドライバ依存なのでどうしようもないですね。
2.Excel OLE経由の操作について
>integer result
>
>OLEObject myoleobject
>
>myoleobject = CREATE OLEObject
>result = myoleobject.ConnectToObject(\"c:\\testdata.xls\")
>
>IF result = 0 THEN
> myoleobject.application.workbooks(1).worksheets(1).cells(1,1).value = 14 ここで落ちている
> myoleobject.application.workbooks(1).save()
>END IF
>DESTROY myoleobject
ConnectToObjectは既に起動されているOLEサーバに対して
接続するものなのでConnectNewObjectを使用して、新しいCOMオブジェクト
を生成してアクセスさせます。
PBが手元にないのでVB(A)流に書きます。動作確認していません。
OLEObject Excel
OLEObject wb
Int ret
Excel = CREATE OLEObject
wb = CREATE OLEObject
ret = Excel.ConnectToNewObject(\"Excel.Application\");
If Not ret = 0 Then
MessageBox(\"Excelアクセスエラー\")
return
End If
wb = Excel.Workbooks.Open(\"c:\\testdata.xls\")
//もし新規ブックで使用するなら
//wb = excel.Workbooks.Add
wb.Worksheets(1).Cells(1,1).Value = 14
//excel.visible= true 確認したければこれを実行
Destroy wb
Destroy Excel
追記ですが、PB5はConnectToNewObjectが実装されていませんでしたっけ?
そうであれば、ShellExecuteAを使ってExcelか、ファイルを
起動しなければいけないかもしれない...
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows 2000
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS Adaptive Server Anywhere 6.0
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.