投稿日	： 2006/09/29(Fri) 11:19
投稿者	： あやめ
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^3: VBで機種名を取得したい

> > WMIでよろしければ、Win32_ComputerSystemクラスのModelプロパティで
>
> ありがとうございます。Windows2000、XPにおいて正しく情報が取得出来ました。
>
> しかし、WindowsNT4.0ではエラーが発生し取得出来ませんでした。
>
> やりたいことと言えば機種ごとに搭載しているRAIDカードが違う為それを判定したい為でして
、まぁ
> 各サーバのLocalに設定ファイルを置いておけば良いのですが、自動判定出来ないかと思って
います。
>
> APIでの取得方法を引き続きお待ちしてます。

1)
Option Explicit
ユーザー名
Public Declare Function GetUserNameA Lib "advapi32.dll" (ByVal lpBuffer As Stri
ng, ByVal nSize As Long) As Long
コンピュ−タ名
Public Declare Function GetComputerName Lib "kernel32" Alias "GetComputerN
ameA" _
(ByVal lpBuffer As String, nSize As Long) As Long


2)
    MyComputerName = ""
    nSize = 100
    lRet = GetComputerName(MyComputerName, nSize)

試してみてください

★ - VBで機種名を取得したい - ともさん 09/26-17:12No.7340
• Re: VBで機種名を取得したい - だい 09/26-20:05 No.7342
  • Re^2: VBで機種名を取得したい - ともさん 09/27-15:08 No.7360
    • Re^3: VBで機種名を取得したい - 花ちゃん 09/27-16:04 No.7363
    • Re^3: VBで機種名を取得したい - あやめ 09/29-11:19 No.7381
      • Re^4: VBで機種名を取得したい - 花ちゃん 09/29-15:22 No.7390