vb.net ile acaba bir sabit diskin seri numarası nasıl öğrenilir diye merak etmiştim ve sonunda aradığımı buldum ve sizle paylaşması güzel olur sanırım.
'öncelikle visual studio'da projenize
project > add references > .net sekmesinden > system.management
desteği eklemelisiniz
'sonra fonksiyonumuzu tanımlıyoruz
Public Function serinoal(ByVal surucu As String) As String
Dim secilen As String = "Win32_logicaldisk='" & surucu & "'"
Dim objMO As New System.Management.ManagementObject(secilen)
objMO.Get()
Return CType(objMO.Properties("VolumeSerialNumber").Value, String)
End Function
'örneğin bir button'un tıklanma olayına şu kodu ekleyelim
MsgBox(serinoal("c:"))
Etiketler: programlama, vb.net




