VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 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 開発環境を入れていたという意味です。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -