HOME       LIST

【VB】ハードディスクのシリアル番号取得

ハードディスクのシリアル番号取得

社員を自社のBest顧客になるように支援すること。 - 2017/03/18(DOJEUN)

That's understandable.(それは無理もない/それはそうだ/それは理解できる)


Public Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long

Dim lngSerial As Long

Call GetVolumeInformation("c:\", vbNullString, 0, lngSerial, 0, 0, vbNullString, 0)
MsgBox lngSerial

以前コンテンツ:【VB】For Next文内で途中で抜ける
次のコンテンツ:【VB】ユーザー定義のデータ型で文字列型(String)の定義



Copyright(c) 2007-2020 dojeun.com All Rights Reserved.

Valid XHTML 1.0 Transitional