VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/05/11(Sun) 15:05 |
| 投稿者 | ： 魔界の仮面弁士 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^9: フレームで区切られたブラウザー |
> 『PersitFile』ではなくて『PersistFile』ですね。
> コピペしてしまったので『s』が抜けていました(^_^;)
うわぁ、すみません。パーシストのスペルが一部間違っていますね。(;_;)
# 現在は、元投稿(No.3882)のスペルを修正してあります。
>> hResult = Invoke_(ObjPtr(Source), comIUnknown_QueryInterface, _
>> VarPtr(mudtIPersistFile), VarPtr(mlpPersistFile))
これは、IUnknown.QueryInterface を呼んでいるところですね。
タイプライブラリを使った場合で言えば、
Dim objPersistFile As IPersistFile
Set objPersistFile = Source
という処理を行う部分になります。
>> 「クラスはオートメーションまたは予測したインターフェースをサポートしていません。」
>> のエラーが出ていますが・・・
Sourceで指定されたオブジェクトが、IPersistFileを持っていなかった、という事ですね。
その場合は、呼び出し側にて On Error を使って、例外処理を行うようにしてみてください。
なおその場合、VBのエラートラップモードを、既定の「クラスモジュールで中断」から、
「エラー発生時に中断」にしておく必要があります。
# エラートラップモードを変更しておかないと、開発環境での実行時では、
# クラス内のErr.Raise部で、実行が中断されてしまいますので。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）