IPHostEntry myIPs = Dns.GetHostEntry(Dns.GetHostName());

label8.Text = "Host IP : " + myIPs.AddressList[0].ToString();

label2.Text = "Host Name :" + myIPs.HostName;

RegistryKey hklp = Registry.LocalMachine;

hklp = hklp.OpenSubKey("HARDWARE\DESCRIPTION\System\CentralProcessor");

Object obc = hklp.GetValue("VendorIdentifier");

label4.Text = "Vendor Identifier : " + obc;

RegistryKey biosv = Registry.LocalMachine;

biosv = biosv.OpenSubKey("HARDWARE\DESCRIPTION\System\MultiFunctionAdapter\4");

Object obv = biosv.GetValue("Identifier");

label5.Text = "Bios Status : " + obv;

RegistryKey biosd = Registry.LocalMachine;

biosd = biosd.OpenSubKey("HARDWARE\DESCRIPTION\System\");

Object obd = biosd.GetValue("SystemBiosDate");

label6.Text = "Bios Date : " + obd;

RegistryKey bios = Registry.LocalMachine;

bios = bios.OpenSubKey("HARDWARE\DESCRIPTION\System\");

Object obs = bios.GetValue("Identifier");

label7.Text = "System Identifer: " + obs;

lblLoggedIn.Text = "Your login name: " + System.Environment.UserName;

lblNet.Text = " .NET Version: " + System.Environment.Version.ToString();

Advertisements