Son iki gündür siteme gelen tekil ziyaretçi sayısı 4 katına çıktı. Sebebine bakınca Google'dan gelenlerin arttığını görüyorum. Sanırım sebep NTV'de yayınlanan "Cengiz HAN" belgeseli.

Moğol imparatoru Cengiz HAN için arama yapıp benim siteme gelenler için aşağıya bir iki link ekledim. :)

http://lostlibrary.org/normalgoster.asp?altbolum=59&yazi=405
http://sozluk.sourtimes.org/show.asp?t=cengiz+han
http://www.nationalgeographic.com.tr/ngm/konu.asp?Konu=1&Yil=03&Ay=04

Her .NET Uygulama Geliştiricisi'nin sahip olması gereken bir tool.

Nedir?
Template-based code generator

Kurmama ve üzerinden çalışmama gerçekten değecek mi?
Kesinlikle evet.(bence)

Ücretli mi?
Uygulama ücretisiz olarak kullanılabilmektedir. Ancak kendi templatelerinizi oluşturmak için kullanabileceğiniz (zorunlu değilsiniz) CodeSmith Studio aracı 30 gün çalışıyor. Daha sonra uygulamayı satın almanız gerekiyor. Ancak template oluşturma işlemini notepad ile bile yapabilirsiniz.

Web Adresi: http://www.ericjsmith.net/codesmith/

WMI sınıfları ile ilgili referans için MSDN'den şu adresi kontrol edebilirsiniz.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_classes.asp

WMI'dan bahsedip örnek kod yazamdan olmaz.

Sistemdeki paylaşımları listeleyen ve paylaşımı kaldırabilen, sisteme kayıtlı printerların isimlerini veren kod parçası:

        Imports System.Management

        'sistemdeki paylaşımları listele ve kaldır

        Dim x As New Management.ManagementObjectSearcher("SELECT * FROM Win32_Share")

        For Each obj As ManagementObject In x.Get

            MsgBox(obj("name"))

            If Not obj.Properties("Path").Value = "" Then 'IPC$ da hata vermemesi için

                obj.Delete() 'paylaşımı kaldır

            End If

        Next

        'printer listesi

        Dim x As New Management.ManagementObjectSearcher("SELECT * FROM Win32_Printer")

        For Each obj As ManagementObject In x.Get

            MsgBox(obj("name"))

        Next