Information Os Finder

Nom : Information Os Finder

Fonction : Donner les information sur un Pc en un seul clique de souris ;)

Comment sa marche ?

Il suffit de cliquer sur le bouton entrer ! ^^
Tout de suite une petite présentation .

Prés requis :

1- 4 labels + 4 textbox + 1 bouton

label1 = Version Os + textbox1
label2 = Buil Os + textbox2
label3 = Path + textbox3
label4 = Id produit + textbox4

Screen :



2- Clicker sur le bouton1 et inserer dessous :  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim readValue As String
        readValue = My.Computer.Registry.GetValue _
        ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "CSDVersion", Nothing)
        TextBox1.Text = readValue
        readValue = My.Computer.Registry.GetValue _
        ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "buildlab", Nothing)
        TextBox2.Text = readValue
        readValue = My.Computer.Registry.GetValue _
        ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "PathName", Nothing)
        TextBox3.Text = readValue
        readValue = My.Computer.Registry.GetValue _
        ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "ProductId", Nothing)
        TextBox4.Text = readValue

Voila vous avez fini votre programme !

Pas mal non ?!!

Cordialement P1l0u

Logiciel : http://www.megaupload.com/?d=OXBVRYB5
Sources : http://www.megaupload.com/?d=8DWVLPB0

Comments

[toto]

C'est bien ce que je pensais
@+
--------------------------------------------------------
Pour améliorer ton site mets les codes sources de bon logicels comme pour espionner la cam

[toto]

Moi jai eesayer sa ne marche pas Os version et Id produit (je suis sur win7)

[..::P1l0u::.]

Beh c'est pour cela peut être car c'est un code pour vista et xp , pas test sous seven