問題タブ [ole-automation]

VarFormat 関数 (oleaut32.dll) でフォーマットされた値をアンフォーマットすることはできますか?

機能説明:

Microsoft COM オブジェクトを作成する次の VBScript スクリプトがあります。

その COM オブジェクトの実装はFoo.dll、Microsoft Foundation Framework (MFC) と特にDispatch Mapsのメカニズムを使用する Dynamic Link Library にあります。

ディスパッチマップはこのように表示されます

ここまでは順調ですね。Excel アプリケーションなどの VBA 環境でこのような COM オブジェクトを作成すると、呼び出しfoo.Einfügenが成功します。VBScript-Script 以外。

VBScript だけでなく、VBA でもOLE Automationが適用されていることを認識しました。しかし、VBScript-Script を実行すると、エラーが発生しました

エラー: 不明な文字です。コード 8000A0408;
出典: Microsoft VBScript でのコンパイルの失敗

最初は文字のせいで VBScript-Script のエンコーディングが間違っていると思っていましたが、üANSI エンコードされていることを確認しました。また、システムのWindows コード ページが西ラテン文字セットのWindows-1252であることも確認しました。

ディスパッチ マップでに変更EinfügenするEinfuegenと、VBScript スクリプトが機能していると断言できます。

私の質問は、foo.EinfügenVBScript と VBA の呼び出しの動作が異なるのはなぜですか? この動作の理由は何ですか?

私にとっての回避策は、関数にDISP_FUNCTIONディスパッチする Dispatch Map に 2 番目のエントリを追加することです。VBScript-Script I で呼び出し、VBA でまだ.EinfuegenInsertfoo.Einfuegenfoo.Einfügen

次のコードは、C# で Excel ファイルを作成して保存するために、このチュートリアルから取得したものです。

正常に動作しているようです。MessageBox msg が表示され、問題の兆候もなくステップスルーできます。ただし、ファイルはハード ドライブに保存されません。なぜだめですか？

C# コードから Perl に COM オブジェクトを渡そうとしています。
現在、Perl コードを PerlNET (PDK 9.4; ActiveState) でラップしており、C# からラップされた Perl モジュールにオブジェクトを渡すために、Perl で単純なサブルーチン (+ 必要なポッド宣言) を定義しました。

渡したオブジェクトが正しく COM オブジェクトとして認識されていないようです。

例:
C# (.NET 4.0) では、ScriptControl を使用して、VBScript で記述されたファイルから単純なクラスをロードします。

私が得るもの ( obj) はタイプSystem.__ComObjectです。それを Perl/PerlNET アセンブリに渡し、Perl でメソッドを呼び出そうとするとXyz()、次の (実行時) 例外が発生します。

ただし、Perl で多かれ少なかれ同じことを行うと、うまくいきます。(次のケースでは、.vbs ファイルの内容のみをパラメーターとして渡します。)スクリプト コントロールを使用することもできます。

これで、呼び出しは正常Xyz()にobj機能します (Win32::OLE を使用)。

どちらの場合も、次を使用します。

別のアプローチ:使用するオーバーロードと渡す型を正確に指定すると、of クラス
を使用してメソッドを呼び出すことができます。InvokeMemberSystem.Type

このアプローチを使用すると、ラップされた Perl モジュール全体を書き直すことになります。そして、この構文を使用して..

PerlNET と COM オブジェクトを使用することで、.NET 4.0 の dynamic キーワードの利点と Perl の動的な特性 (Win32::OLE を使用) の両方を失うのではないかと考えています。

dynamic私の好みの解決策は、C#/.NET 4.0 のキーワードの動作を模倣する何らかの方法に集約されるようです。

または、渡された COM オブジェクトを と互換性があると認識されるものに変換する何らかの方法を見つけることをお勧めしWin32::OLEます。__ComObjectCOMオブジェクトとして正しく識別されるように、の情報を抽出するかもしれません。

PDK ディスカッション サイトにも投稿したことを追加する必要があります (ただし、まだ応答がありませんでした): http://community.activestate.com/node/18247
PerlMonks にも投稿しました。これがPerlまたはC#/.NETの質問であるかどうかを確認してください: http://www.perlmonks.org/?node_id=1146244

助けていただければ幸いです-または、さらに調べる場所についてアドバイスしてください。

oleautomation タイプには、VT_xxx タイプがあります。

カスタム タイプの場合、IRecordInfo があります。

SafeArrayCreateEx(VT_RECORD, 1, &rgbounds, pRecInfo);

しかし、POINT などの Windows のシステム タイプに適したタイプは何ですか?