【NetOffice】COMテクノロジを覗きたい!(2)

  • 2012.12.10 Monday
  • 00:01
JUGEMテーマ:コンピュータ

Source and Project

腹立たしいことに記事を書いた後に、投稿ボタンをおしたら記事が消えました(涙)書き直しなので、とてもやる気がしません。

-------------------------
Summary
ROT(Runnin Object Table)は、ホストとなるコンピュータで、一つだけ存在します。
ROTは、モニカと実際のオブジェクトを管理しています。
ROTに問い合わせれば、実行中のオブジェクトが何かわかります。

-------------------------

using System;
using System.ComponentModel;
using System.Runtime.InteropServices;
using System.Runtime.InteropServices.ComTypes;
namespace Art55.NetOfficeDemo20121209_001
{
    class Program
    {
        static void Main()
        {
            DipsplayRunningObjectTable();
        }
        [DllImport("ole32.dll")]
        private static extern int CreateBindCtx(uint reserved, out IBindCtx pctx);
        public static void DipsplayRunningObjectTable()
        {
            IBindCtx bindCtx;
            if (CreateBindCtx(0, out bindCtx) != 0)
            {
                return;
            }
            IRunningObjectTable runningObjectTable;
            bindCtx.GetRunningObjectTable(out runningObjectTable);
            IEnumMoniker enumMoniker;
            runningObjectTable.EnumRunning(out enumMoniker);
            IntPtr fetched = IntPtr.Zero;
            enumMoniker.Reset();
            var monikers = new IMoniker[1];  // 一つずつ取得する。
            while (enumMoniker.Next(monikers.Length, monikers, fetched) == 0)
            {
                IMoniker moniker = monikers[0];
                string displayName;
                moniker.GetDisplayName(bindCtx, null, out displayName);
                object comObject;
                if (runningObjectTable.GetObject(moniker, out comObject) == 0)
                {
                    string name = TypeDescriptor.GetClassName(comObject);
                    string component = TypeDescriptor.GetComponentName(comObject, false);
                    Console.WriteLine("Display Name: " + displayName);
                    Console.WriteLine("ClassName: " + name);
                    Console.WriteLine("Component: " + component);
                    Console.WriteLine("COMObject: " + Marshal.IsComObject(comObject));
                    Console.WriteLine();
                    if (Marshal.IsComObject(comObject))
                    {
                        Marshal.ReleaseComObject(comObject);
                    }
                }
                Marshal.ReleaseComObject(moniker);
            }
            Marshal.ReleaseComObject(enumMoniker);
            Marshal.ReleaseComObject(runningObjectTable);
            Marshal.ReleaseComObject(bindCtx);
        }
    }
}

上記、作成したプログラムで、COMオブジェクトの登録状況を見ていきたいと思います。

■Excelアプリケーションを起動せずに実行してみます。

Visual Studio関連のCOMオブジェクトが表示されますが、Excelっぽいやつは見当たりませんでした。

■Excelアプリケーションを起動して、プログラムを実行してみます。

Display Name: Book1
ClassName: Workbook
Component: Book1
COMObject: True
Display Name: !{00024500-0000-0000-C000-000000000046}
ClassName: Application
Component: Microsoft Excel
COMObject: True

Excelアプリケーションとその中で開かれているブックがCOMオブジェクトとして登録されているのがわかります。

■PowerShellを利用して、COMオブジェクトを操作してみます。
> $application = New-Object -ComObject "Excel.Application"
> $application.Visible = $true;
> $application.Workbooks.Add()
> $worksheet = $workbook.Worksheets.Item(1)
> $worksheet.Range("A1").Value2 = "A1"

Excelアプリケーション・ブック・シート・セルのそれぞれのCOMオブジェクト触っているので、COMとして登録されていると思われます。実際に登録状況をみると

Display Name: Book1
ClassName: Workbook
Component: Book1
COMObject: True
Display Name: !{00024500-0000-0000-C000-000000000046}
ClassName: Application
Component: Microsoft Excel
COMObject: True

Display Name: !{00024505-0014-0000-C000-000000000046}
ClassName: Application
Component: Microsoft Excel
COMObject: True

もっといっぱい出るかなと思いましたが、一つ何か増えただけでした。
ちなみに、00024500-0000-0000-C000-000000000046は、Excel ApplicationのCLSIDのようです。00024505-0014-0000-C000-000000000046はMicrosoft Excel Charting ApplicationのCLSIDです。

■今回、プログラムを作成するに辺り参考にさせていただいた先を紹介します。

Excel ファイルまたは Word 文書の IDispatch を OCX から取得する方法
http://support.microsoft.com/kb/190985/ja

NetOffice
NetOffice 1.5.1.2 [RC]¥Source¥NetOffice¥RunningObjectTable.cs

Source and Project

--------------------------------------
本投稿は、CodePlexで公開されているNetOfficeを利用していませんが、紹介します。
NetOffice - MS Office in .NET
http://netoffice.codeplex.com/

NetOffice関連の記事は下記にまとめています。
【NetOffice】【Excel】NetOfficeのまとめ
http://pro.art55.jp/?eid=1304102
--------------------------------------

コメント
コメントする








    
この記事のトラックバックURL
トラックバック

calendar

S M T W T F S
1234567
891011121314
15161718192021
22232425262728
293031    
<< July 2018 >>

あわせて読みたい

あわせて読みたいブログパーツ

selected entries

categories

archives

recent comment

  • 【キーボード】6年前のRealForceを復活させることはできる!?その3
    art55 (05/22)
  • 【キーボード】6年前のRealForceを復活させることはできる!?その3
    分解大好き (05/18)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    art55 (02/04)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    Gen (02/04)
  • 【キーボード】RealForce が壊れて帰ってきた。
    art55 (04/29)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    art55 (02/23)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    かるあ (02/22)
  • 【C#】Dictionaryの実装・データ構造・アルゴリズムを観察する。
    art55 (01/16)
  • 【C#】Dictionaryの実装・データ構造・アルゴリズムを観察する。
    karuakun (01/16)
  • 【NetOffice】【Excel】死なないExcelプロセスをKillする。
    art55 (12/05)

recent trackback

recommend

recommend

recommend

C#プログラマのための.NETアプリケーション最適化技法 (Programmer's SELECTION)
C#プログラマのための.NETアプリケーション最適化技法 (Programmer's SELECTION) (JUGEMレビュー »)
Sasha Goldshtein,Dima Zurbalev,Ido Flatow,サシャ・ゴルドシュタイン,ディマ・ズルバレフ,イド・フラトー

recommend

ろんりと集合
ろんりと集合 (JUGEMレビュー »)
中内 伸光
とてもわかりやすいです。

recommend

recommend

シャノン・ノイマン・ディジタル世界
シャノン・ノイマン・ディジタル世界 (JUGEMレビュー »)
市川 忠男
4章がリレーショナルデータベースな内容になってます。ページ数があまりありませんが、ポイントがものすごく的確にまとまっていて、感動します。

recommend

recommend

東プレ Realforce91UBK-S 静音キーボード 静電容量無接点方式 変荷重 ブラック NG01BS
東プレ Realforce91UBK-S 静音キーボード 静電容量無接点方式 変荷重 ブラック NG01BS (JUGEMレビュー »)

テンキーレス、静音のRealForce91UBK-S。スコスコ感がたまらなく気持ちいいです。家と会社で2台持ってます。

recommend

recommend

プログラミング.NET Framework 第4版 (プログラミングシリーズ)
プログラミング.NET Framework 第4版 (プログラミングシリーズ) (JUGEMレビュー »)
Jeffrey Richter
発売予定美 2013年10月10日。.NET Frameworkとお付き合いする人のバイブルですね。

recommend

recommend

キャット・シッターの君に。
キャット・シッターの君に。 (JUGEMレビュー »)
喜多嶋 隆
私のイラストレータデビュー本です。

recommend

Essential .NET ― 共通言語ランタイムの本質
Essential .NET ― 共通言語ランタイムの本質 (JUGEMレビュー »)
ドン・ボックス,クリス・セルズ,Don Box,Chris Sells,吉松 史彰

links

profile

search this site.

others

mobile

qrcode

powered

無料ブログ作成サービス JUGEM