Google 網路論壇不再支援新的 Usenet 貼文或訂閱項目,但過往內容仍可供查看。

serial number

瀏覽次數:6 次
跳到第一則未讀訊息

Wayne Morgan

未讀,
2004年3月1日 下午4:53:452004/3/1
收件者:
Open the case. Move what you need to out of the way of the sticker on the MB
or HD and see what it says. Depending on the case, this may be easy or hard
to do.

Some motherboards will have the serial number in the BIOS setup. Also, the
hard drive manufacture's error detection utility (usually a free download)
will usually be able to give you the serial number of the hard drive.

--
Wayne Morgan
Microsoft Access MVP


"Jason Frazer" <anon...@discussions.microsoft.com> wrote in message
news:57C5CD19-97EF-4B42...@microsoft.com...
> How can i get the serial number off of the hard drive or motherboard?
>
> Thanks
> Jason


Adrian Jansen

未讀,
2004年3月1日 下午5:56:592004/3/1
收件者:
There is a Windows API call:

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

Public Function GetSerialNumber(strDrive As String) As Long

'KPD-Team 1998
'URL: http://www.allapi.net/
'E-Mail: KPD...@Allapi.net
Dim Serial As Long, VName As String, FSName As String
'Create buffers
VName = String$(255, Chr$(0))
FSName = String$(255, Chr$(0))
'Get the volume information
GetVolumeInformation strDrive, VName, 255, Serial, 0, 0, FSName, 255
'Strip the extra chr$(0)'s
' VName = Left$(VName, InStr(1, VName, Chr$(0)) - 1)
' FSName = Left$(FSName, InStr(1, FSName, Chr$(0)) - 1)
'MsgBox "The Volume name of C:\ is '" + VName + "', the File system name
of C:\ is '" + FSName + "' and the serial number of C:\ is '" +
Trim(Str$(Serial)) + "'", vbInformation + vbOKOnly

GetSerialNumber = Serial

End Function

--
Regards,

Adrian Jansen
J & K MicroSystems
Microcomputer solutions for industrial control

Wayne Morgan

未讀,
2004年3月2日 凌晨12:03:062004/3/2
收件者:
Sorry Jason, we get many misposts in here asking for help. Your message
didn't specify why you were wanting this, I thought it was a maintenance
problem. Since the drive manufacture's software can read the serial number
from the hard drive, I'm sure there is a way to do it, but I don't know how.
If the computers are networked, you may have better luck reading the MAC
address of the network card. I looked at Adrian's API call, but I don't
think it gets down to the hardware information you are asking for. It sounds
as if what you are after is something similar to the Windows Activation
routines.

--
Wayne Morgan
Microsoft Access MVP


"Jason Frazer" <anon...@discussions.microsoft.com> wrote in message

news:3D0E6505-38C5-42E6...@microsoft.com...
> lol. Funny!!! I know this.... I wish it was that simple.
> I want to find the serial number from one of the devices to set up a
registration form.
> That would require the user to enter a key number that is generated from
the serial number.
> So the sensitive information in the database can not be distributed
without authorization
> Opening the case wil not work for this.
>
> Thanks
> Jason Frazer
>


Jason Frazer

未讀,
2004年3月2日 上午11:51:412004/3/2
收件者:
Thanks for your help.

That works great.

Jason

"Adrian Jansen" <q...@noqqwhere.com> wrote in message
news:4043cbd6$3...@duster.adelaide.on.net...

0 則新訊息