Vb.net ile bilgisayarınızın işletim sistemi , bios ve çeşitli bilgilerini kolay bir şekilde görüntüyebilirsiniz.

İşlemci Bilgilerini Görüntülemek :

Dim query As New SelectQuery("Win32_processor")
Dim search As New ManagementObjectSearcher(query)
Dim info As ManagementObject
For Each info In search.Get()
Textbox1.Text = "Processor: " & info("caption").ToString() & CRLF
Next

Bios Bilgilerini Görüntülemek :

Dim query As New SelectQuery("Win32_bios")
Dim search As New ManagementObjectSearcher(query)
Dim info As ManagementObject
For Each info In search.Get()
Textbox1.Text = "Bios version: " & info("version").ToString() & CRLF
Next

İşletim Sistemi Bilgilerini Görüntülemek :

Dim search As New ManagementObjectSearcher("SELECT * FROM Win32_OperatingSystem")
Dim info As ManagementObject
For Each info In search.Get()
Textbox1.Text = "Name: " & info("name").ToString() & CRLF 'sistemin Adı
Textbox1.Text += "Version: " & info("version").ToString() & CRLF ' versiyonu
Textbox1.Text += "Manufacturer: " & info("manufacturer").ToString() & CRLF
Textbox1.Text += "Computer name: " & info("csname").ToString() & CRLF ' bilgisayar adı
Textbox1.Text += "Windows Directory: " & _
info("windowsdirectory").ToString() & CRLF ' dizini
Next

Genel Bilgisayar Bilgilerini Görüntülemek :

Dim search As New ManagementObjectSearcher("SELECT * FROM
Win32_ComputerSystem")
Dim info As ManagementObject
For Each info In search.Get()
Textbox1.Text = "Manufacturer: " & info("manufacturer").ToString() & CRLF
Textbox1.Text += "Model: " & info("model").ToString() & CRLF
Textbox1.Text += "System Type: " & info("systemtype").ToString() & CRLF
Textbox1.Text += "Total Physical Memory: " & _
info("totalphysicalmemory").ToString() & CRLF
Next

Bu bilgileri görünülemek çoğu yerde işinize yarayabilir. Kodları butonlar içerisine yerleştirebilirsiniz.Görüntülemek için TEXTBOX kullanılmıştır.Daha gelişmiş birşeyler yapmak istiyorsanız labelleri kullanabilirsiniz...

Ajax nesnelerini eklemeden önce , Ajax'ın ne olduğundan bahsedecek olursak :

Ajax : En yaygın kullanım alanı sayfayı tekrardan yüklemeye gerek kalmadan sayfada görünür değişiklikler yapmaktır. XMLHttpRequest kullanarak birden fazla bağımsız işlemi yapabilir. Bazı bilişim uzmanları, AJAX'ın HTML ve XML'den sonra en yenilikçi Internet yazılımı olduğunu ve Web 2.0'ı bitirip, 3. evreye ulaştırdığını iddia etmişlerdir.

Günümüzde birçok dev firmalar (Google,Microsoft,Yahoo vs ...) ajax alt yapısını kullanmaktadır. Visual Basic blogumuzun bu yazısında bahsettiğimiz ajax kontrollerini eklemek için :

• Öncelikle : Ajax Control Toolkit Download adresinden AJAXControlToolkitSource.zip dosyasını indiriyoruz.
• İndirme işlemini tamamladıktan sonra Visual Stdio'yu başlatıp yeni bir web sitesi projesi oluşturuyoruz.
• Daha sonra ise sol tarafta bulunan TOOLBAX'ımıza sağ tıklayarak yeni bir tab açıyoruz.Kolaylık olması için adını AJAX NESNELERİM yapabilirsiniz.
  
• Tabımızı açtıktan sonra içerisinden sağ tıklayıp CHOOSE ITEMS diyoruz ve ardından BROWSE diyerek indirdiğimiz dosya içerisinden AjaxControlToolkit/Bin/Debug/AjaxControlToolkit.dll adlı dosyayı seçiyoruz ve ekliyoruz.Ajax nesnelerim adlı tabımıza baktığımızda birsürü ajax kontrollerinin ekledini görüyoruz.

Normal olarak Visual Studio üzerinde bağzı ajax kontrolleri gelmektedir ama tam olarak yüklü değildir.Yukarıdaki işlemleri yaparak varolan tüm kontrolleri ekleyip projelerinize katabilirsiniz.Ayrıca indirdiğiniz dosya içerisindenki örnek projelere bakarak da ajax ile neler yapabileceğinizi ve nasıl yapıldıklarını görebilirsiniz.