投稿日 | : 2007/01/18(Thu) 12:41 |
投稿者 | : わんこ |
Eメール | : |
URL | : |
タイトル | : Re^4: WMIの利用条件について |
ご回答頂きありがとう御座居ます。
> そうではなくて……それらの「どの部分」が NG だったのかが重要だ、という事です。
> 実際に、どの行を実行するときにエラーになるのですか?
最初の
Set A = GetObject("winmgmts:{impersonationLevel=impersonate}")
の部分でエラーになります。
> 『"On Frror" (On Error?) に入った際』というのは、どの部分の事ですか?
***********************************************
Private Function XXXXXXXXXX
On Error GoTo ErrorHandler
-- 処理 --
ExitFunction:
On Error Resume Next
Exit Function
ErrorHandler:
★
Resume ExitFunction
Resume Next
***********************************************
上記、★の部分です。
> >> 3) 省略表記せず、名前空間まで明示指定した場合には動作するのか。
> > 省略しない場合もNGです。上記サンプルの通り↑
> どの部分でエラーになるのですか? またそれは、同じエラー内容でしたか?
上記と同じ、
Set A = GetObject("winmgmts:{impersonationLevel=impersonate}")
の部分でエラーになります。
> >> 4) GetObject からのシンタックスではなく、CreateObject から順に生成した場合はどうか。
> > 私もこの方法は分かりません。ちょっと調べます。
> 手順的には、参照設定して New する場合と全く同じ方法で OK ですよ。
> New する部分を、CreateObject するだけです。
お手数ですが、CreateObjectにする場合のサンプルを頂けませんか??
また必要な参照設定等あれば、それもご教授下さい。
> 「VB6.0が入っていた」というのは、Embedded の提供ベンダが、あらかじめ VB6 開発環境を
> インストール済みの状態で出荷している……という意味でしょうか?
> それとも、わんこさん以外の人が、事前に VB6 開発環境を入れていた、という意味ですか?
後者、他の誰かがVB6 開発環境を入れていたという意味です。