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

タイトル Re^3: M/Bステータス取得方法
投稿日: 2004/06/02(Wed) 15:24
投稿者でった
M/Bステータス取得ですが、以下の様に組んで実行したのですが
3台PCでテストし、マザーボードの製品名が取得できるPCとでき
ないPCとがあり、バージョンの方は全く取得できませんでした。
バージョンは取得できなくても構わないのですが、製品名を全端末
にて取得したいのですが何か方法があるでしょうか?

取得したいPC
IBM機 デスクトップ数種類,ノート数種類
です。

Dim moSearch As New ManagementObjectSearcher("SELECT * FROM Win32_BaseBoard")
Dim mo As ManagementObject
Dim strMes As String
For Each mo In moSearch.Get()
    strMes = "マザーボードの製造元:" & _
             NothingToBlankStr(mo.Item("Manufacturer")).ToString & vbCrLf
    strMes = strMes & "マザーボードの製品名:" & _
             NothingToBlankStr(mo.Item("ProDuct")).ToString & vbCrLf
    strMes = strMes & "マザーボードのバージョン:" & _
             NothingToBlankStr(mo.Item("Version")).ToString
Next
MsgBox(strMes)

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

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