[vb.net] Computer Information Source

[CodeBreaker]

Computer Information Source


Get the Computer User:::Alien::
[vb]
Textbox1.Text = Microsoft.Win32.Registry.GetValue("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion", "RegisteredOwner", "")
[/vb]

Get the Computer Company:::Alien::
[vb]
Textbox1.text = Microsoft.Win32.Registry.GetValue("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion", "RegisteredOrganization", "")[/vb]

Gets Processor Name:::Alien::
[vb]
Textbox1.text = Microsoft.Win32.Registry.GetValue("HKEY_LOCAL_MACHINE\Hardware\DESCRIPTION\System\CentralProcessor\0", "Identifier", "")
[/vb]

Gets OS Name:::Alien::
[vb]
Textbox1.text = My.Computer.InfSFullName
[/vb]

Gets OS Version & Build Number:::Alien::
[vb]
Textbox1.text = My.Computer.InfSVersion
[/vb]

Gets System Product Name:::Alien::
[vb]
Textbox1.text = Microsoft.Win32.Registry.GetValue("HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\SystemInformation", "SystemProductName", "")
[/vb]

Gets Total Physical Memory:::Alien::
[vb]
Textbox1.text = My.Computer.Info.TotalPhysicalMemory
[/vb]

Gets Available Physical Memory:::Alien::
[vb]
Textbox1.text = My.Computer.Info.AvailablePhysicalMemory
[/vb]

Gets Clipboard Text:::Alien::
[vb]
Textbox1.text = My.Computer.Clipboard.GetText
[/vb]

​

 

[OliverE]

If you could find the code that gets the os key, that would be awesome and just then send all the details through email to your self

 

[CodeBreaker]

I'll Try It To Figure it out later! :/

 

[Scrappy CoCo]

Very nice share. It will come handy sometime.

 

[CodeBreaker]

Thank You Mate
i am glad that u liked it!

 

[OliverE]

Cool, let me knw

Nice Share