MyDesign | Kod Arşivi - Anasayfaya Dön   No banner in farm
Anasayfa Araştır Forum Gelişmiş Arama Siteniz İçin En Hit İçerikler RSS İçerik Ekle Scriptler Destekleyenler Kadromuz Reklam İletişim Giriş Sayfası Yap  Sık Kullanılanlara Ekle
Bu Kategorinin En Yeni Kodları:


Bu Kategorinin En Çok Görüntülenen Kodları:






Arama:
Gelişmiş Arama


No banner in farm



En Çok Görüntülenen Kodlar:


Üye Girişi:
 Üye Ol



Anasayfa > VB.Net > Kodlar

Harddisk serial no öğrenme

Programınızın kurulduğu bilgisayarın Hdisk numarasını alarak birşeyler yapabilirsiniz programınızın başka bir bilgisayara kurulumunu engelleme gibi

Kategori : VB.Net
Gönderen : seref
Telif :
Tarih : 13 Temmuz 2006
Örnek Dosya : İndir
Okunma Sayısı : 30204
Puan
: 8,5 / 10 (31 Oy)
Puan Verin :
Google Bookmarks  del.icio.us  Digg  Yahoo! MyWeb  Windows Live  Furl
 
 
'references'a system.Management'i ekleyiniz
Imports System.Management


 Dim disk As New ManagementClass("Win32_PhysicalMedia")

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For Each Hdisk As ManagementObject In disk.GetInstances()
            If Hdisk("SerialNumber") <> Nothing Then
                MessageBox.Show("Hdisk serino: " & CStr(Hdisk("SerialNumber")))
            End If
        Next Hdisk
    End Sub
 
 

Harddisk serial no öğrenme için yazılan yorumlar

Onur  { 26 May�s 2013 }
Sezgin'in dediği gibi System.Management'i Project/Add Reference... seçeneğinden eklemediğiniz sürece kodlar hata verecektir. Sonra sayıp sövmeyin kodlar hatalı diye :)

mustafa  { 28 Ocak 2012 }
vb 2010 da ki kod nedir ?

Bapha  { 23 A�ustos 2011 }
Kodlar için teşekkürler,yazılım çok iyi çalışıyor.Hdd seri numarasını textboxtan kopyala-yapıştır işlemini gerçekleştirmek isteyen arkadaşlar için bir katkı da benden :) ' MsgBox("Hdisk serino: " & CStr(Hdisk("SerialNumber"))) satırından sonra
TextBox1.Text = TextBox1.Text + CStr(Hdisk("SerialNumber"))
satırını ekleyin.

ali ali  { 07 May�s 2011 }
Dağru Add Referanstan ekleyince sorun çıkartmıyor ancak bende seri numarasını getirmedi neden olabilir

Hamdi İnan  { 17 Mart 2011 }
40 haneli olan kod hangi koddur ve bunu değiştiren bi program biliyormusun acil cevap lütfen acil lazım

Sezgin  { 27 Haziran 2010 }
references'a system.Management'i ekleyiniz diyor eğer Project/Ad Referans'tan eklersen çalışıyor denedim oldu

kaan   { 21 May�s 2009 }
hocam saol ama managementobject de hata veriyo

Yorum ekleyin

Anasayfa > VB.Net > Kodlar > Harddisk serial no öğrenme
Kategoriler:


Forum:



Bağlantılar:


En Son Yorumlanan İçerikler:


Murat Yavuz | Site Haritası | Gizlilik Bildirimi | 54.224.166.141 | 0,14 Saniye
© Copyright 2004-2018 MyDesign | Kod Arşivi. Tüm Hakları Saklıdır.
MyDesign | Kod Arşivi, en iyi görünüm için, 1024x768 ve üzeri çözünürlük tavsiye eder.