tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: MACアドレスが取得できなくなりました
投稿日: 2008/04/28(Mon) 17:08
投稿者よっくん
魔界の仮面弁士様
アドバイスありがとうございます。


> WMI のサービス起動に時間がかかっている、という事はありませんか?
> ・WMI のサービスが起動状態になっているかどうか。

サービスで確認したところ、状態は開始になっておりました。
Windows Management Instrumentationを
念のため停止→開始を行いましたが、一緒でした。

> ・\root\\cimv2:Win32_NetworkAdapter 以外のクラスであれば取得できるのか。

私自身、WMIをよくわかっていないのですが
Win32_LogicalDisk の Description を取得するように変えて
実行したところ、やはりフリーズしました。

> ・Windows Update による更新をロールバックした場合、取得できるようになるのか。

これが一番問題でして…。
実は、通常にWindows Updateを行ったのではなく、リカバリソフトによる
差分データ配信を使って行っております。
(一台でWindows Update→差分データ抽出→差分データを他PCへ配信)
なので、ロールバックができません。

↑が原因で、どこかしらのファイルが壊れたのかなぁと思い
もし再インストールできるものがあれば と思い質問させて頂きました。

かなり通常ではない環境ではありますが
何かやってみる事はあるでしょうか… orz



----------------------------------------------------------------------------
'Win32_LogicalDiskの取得ソース

        Dim objServices As Object
        Dim objObjectSet As Object
        Dim objObject As Object

        objServices = GetObject("winmgmts:{impersonationLevel=impersonate}")
        objObjectSet = objServices.InstancesOf("Win32_LogicalDisk")

        For Each objObject In objObjectSet
            If IsDBNull(objObject.description) = False Then
                MsgBox(objObject.description)
            End If

        Next

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

古いスレッドにレスはつけられません。