Windows 10 Ürün Anahtarınızı VBScript Kodu ile Bulmak
Windows 10 ürün anahtarı, Windows işletim sisteminin lisanslanması için kullanılan 25 haneli bir koddur. Bu kod, Windows’u yeniden yüklediğinizde veya başka bir bilgisayara aktardığınızda ihtiyaç duyacağınız önemli bir bilgidir.
Windows 10 ürün anahtarınızı öğrenmenin birkaç yolu vardır. Bunlardan biri, Windows’un kurulu olduğu bilgisayarın kutusundan veya satın alma makbuzundan kontrol etmektir. Ancak, bu bilginin kaybolması veya erişilemez olması durumunda, ürün anahtarınızı VBScript kodunu kullanarak da öğrenebilirsiniz.
VBScript Kodu ile Ürün Anahtarını Bulma
VBScript, Microsoft Windows ve Windows Server işletim sistemlerinde bulunan bir betikleme dilidir. Bu dil, basit görevlerden karmaşık uygulamalara kadar çeşitli amaçlar için kullanılabilir.
Windows 10 ürün anahtarınızı VBScript kodunu kullanarak bulmak için aşağıdaki adımları izleyin:
- Not Defteri’ni açın.
- Aşağıdaki kodu kopyalayın ve Not Defteri sayfasına yapıştırın:
Set objReg = GetObject("winmgmts:root\default\CIMV2:Win32_OperatingSystem")
ProductKey = objReg.ProductID
MsgBox ProductKey- Dosyayı “WindowsProductKey.vbs” olarak kaydedin.
- Dosyayı çift tıklayarak çalıştırın.
Bu kod, Windows kayıt defterinden ürün anahtarını okuyacak ve bir mesaj kutusu aracılığıyla görüntüleyecektir.
Kodun Açıklaması
Kodun ilk satırı, Set objReg = GetObject("winmgmts:root\default\CIMV2:Win32_OperatingSystem") ifadesi, objReg adında bir nesne oluşturur. Bu nesne, Windows kayıt defterinde bulunan Win32_OperatingSystem CIM nesnesini temsil eder.
İkinci satır, ProductKey = objReg.ProductID ifadesi, ProductKey değişkenine objReg nesnesinin ProductID özelliğinin değerini atar. Bu özellik, Windows ürün anahtarını temsil eder.
Üçüncü satır, MsgBox ProductKey ifadesi, ProductKey değişkeninin değerini bir mesaj kutusu aracılığıyla görüntüler.
Kodun Değiştirilmesi
Kodun, ihtiyaçlarınıza göre değiştirilebileceği birkaç yolu vardır. Örneğin, mesaj kutusunun başlığını veya ürün anahtarını bir dosyaya kaydetmeyi tercih edebilirsiniz.
Mesaj Kutusunun Başlığını Değiştirmek
Mesaj kutusunun başlığını değiştirmek için, MsgBox ProductKey ifadesini aşağıdaki gibi değiştirebilirsiniz:
MsgBox "Windows Ürün Anahtarı", vbInformation, "Windows Ürün Anahtarı"Bu kod, mesaj kutusunun başlığını “Windows Ürün Anahtarı” olarak değiştirecektir.
Ürün Anahtarını Dosyaya Kaydetmek
Ürün anahtarını bir dosyaya kaydetmek için, MsgBox ProductKey ifadesini aşağıdaki gibi değiştirebilirsiniz:
Set objFile = CreateObject("Scripting.FileSystemObject")
objFile.WriteFile("WindowsProductKey.txt", ProductKey)Bu kod, WindowsProductKey.txt adlı bir dosyaya ProductKey değişkeninin değerini yazacaktır.
Sonuç
VBScript kodunu kullanarak Windows 10 ürün anahtarınızı bulmak, kolay ve hızlı bir yöntemdir. Bu yöntemi kullanarak, ürün anahtarınızı güvenli bir şekilde saklayabilirsiniz.